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Dilwyn Jones Computing 
41 Bro Emrys, Tal-y-Bont, 


Bangor, Gwynedd LL57 3YT 
Tel: Bangor (0248) 354023 


SOFTWARE 


ADDRESS LABELLER(flp, mdv, 384k, R) 
BASIC REPORTER (flp, 128k) 
BASIC REPORTER (mdv, 128k) 
BIBLE TEXT DISKS (flp, Quill format) £20.00 
BIBLE TEXT DISKS (flp, Editor format) £20.00 
COCKTAILS WAITER (flp, 256k) £10.00 
COCKTAILS WAITER (mdv, 256k) £12.00 
Cocktails waiter recipes sets: 

MIX 2 (flp, mdv) 

MIX 3 (flp, mdv) 
DATA DESIGN, by PROGS V2.03 (flp, 512k) . £50.00 
DISCOVER (fllp, 256k, dual drives) 
MULTI DISCOVER (flp, 256k, dual drives) 
TEXTIDY (flp, 256k) 
FLASHBACK (flp, mdv, 256k) £25.00 
FLASHBACK SPECIAL EDITION (flp, 256k) ... £40.00 
Upgrade FLASHBACK to FLASHBACK SE 

(return master copy) 
HOME BUDGET (flp, 128k) 
HOME BUDGET (mdv, 128k) 
FILEMASTER (flp, mdv, 512k, R) 
FILES 2 (flp, mdv, 128k) 
IMAGE PROCESSOR V2 (flp, mdv, 256k) 
PAGE DESIGNER 2 PLUS (flp, 512k) 
Upgrade PD2, return master copy 
PD2 CLIPART, Screen Format (flp, 128k) 
PICTUREMASTER (flp, 256k) 
PICTUREMASTER PLUS (flp, 256k) 
Upgrade PICTUREMASTER to PLUS version 

(quote serial number) 
QL GENEALOGIST 2ND EDITION (flp, 384k) . £30.00 
QL GENEALOGIST 1ST EDITION (flp, 384k) .. £19.50 
Upgrade QLG1 to QLG2 (return master) £12.00 
BUDGET QL GENEALOGIST (flp, mdv, 128k) £12.00 
Upgrade Budget QLG to QLG 2nd Edition 

(return master) 
QLIBERATOR COMPILER (flp, 256k) 
BUDGET QLIBERATOR (flp, mdv, 128k) 
QLOAD/QREF (flp, mdv, 128k) 


CATALOGUE 


PLEASE ASK FOR A COPY OF OUR QL 
SOFTWARE CATALOGUE (SENT FREE ON 
REQUEST WITH ORDERS). WE NOW SELL 

SO MANY ITEMS THAT WE CANNOT 
PROVIDE MUCH DETAIL IN THE ADVERT, 
THE CATALOGUE CONTAINS MORE 
DETAILS OF ALL OUR PROGRAMS 


QUESTION MASTER (flp, 128k) £10.00 
QUESTION MASTER (mdv, 128k) £12.00 
QUIZ SETS for Question Master. Each £5.00 
1. General Knowledge 2. Classical Music 
3. QLestions (Questions about the QL) 
QUICK POSTERS (flp, 128k) 
QUICK POSTERS (mdv, 128k) 
REMIND-ME (flp, mdv, 128k) 
ROB ROY BARGAIN PACK (flp, 128k) 
ROB ROY BARGAIN PACK (mdv, 128k) 
SCREEN SNATCHER (flp, mdv, 128k) £12.00 
SCREEN ECONOMISER (flp, 128k) £10.00 
SCREEN ECONOMISER (mdv, 128k) £12.00 
SLOWGOLD 2 (flp, mdv, 128k) 
SPELLBOUND (flp, mdv, 256k) 
SPELLBOUND SPECIAL EDITION (flp, 512k) . £50.00 
Upgrade Spellbound to SE (return master) ... £30.00 
SUPER DISK LABELLER (flp, 256k) £10.00 
SUPER DISK INDEXER (flp, mdv, 256k) 
TASKMASTER (flp, mdv, 384k) 
Upgrade TASKMASTER for Hard Disks 

(return master copy) 
THE CAT (flp, 128k) 
THE CAT (mdv, 128k) 
THE CLIPART, by PROGS (flp, mdv, 128k) ...£12.00 
THE PAINTER V4.03, by PROGS (flp, 512k) .. £25.00 
THE GOPHER (flp, mdv, 128k) 
TRANS24 (flp, 128k) 
TRANS24 (mdv, 128k) 
VISION MIXER (flp, 384k) 
VISION MIXER (mdv, 384k) 
VISION MIXER PLUS (flp, 256k) £22.50 
Upgrade VISION MIXER to VISION MIXER PLUS 

(quote serial number) 
WINBACK (flp, 256k) 


SOFTWARE 
DISCOUNTS 


BUY 2 PROGRAMS TOGETHER, 
CLAIM 5% OFF 


BUY 3 OR MORE PROGRAMS, 
CLAIM 10% OFF 


LABELS 


MICRODRIVE LABELS roll of 100 
DISK LABELS roll of 100 
DISK LABELS roll of 100 on 
printer pin feed backing 
ADDRESS LABELS printer roll of 100 
3.5" wide, 1.5" high 
Please add 50p postage per roll of labels (max. postage £2.50) if 
only orderning labels. 


3.5" unbranded DSDD disks 
20 or more disks 

Pack of 10 SONY branded 3.5" 

5.25" DSDD unbranded disks 

Microdrive cartridges (new) 


N.B. PLEASE ADD POSTAGE SPECIFIED BELOW. NO NEED TO 
ADD POSTAGE ON MICRODRIVE CARTRIDGES IN UK. 


DISK STORAGE 
BOXES 


Posso boxes, drawer style, holds 150 3.5" disks, 
stackable, storage system 

Box to hold 80 3.5" disks, with lockable, 

Clear lid 

Box to hold 40 3.5" disks, with lockable, 

Clear lid 

Slimpak case, small plastic box, holds 

10 3.5" disks 

Set of 20 headed disk box subject dividers, "dry wipe’ 
laminated, assorted headings one side, blank other 


POSTAGE RATES - SEE BELOW 


STANDS 


Monitor stand, tilt & swivel, holds up to 14" 
screen monitors 
Printer stand, plastic, fits most 80 column 
printers 

POSTAGE RATES — SEE BELOW 


SOFTWARE POSTAGE: Software sent post-free to UK addresses. Abroad add £1.00 per program for postage and packing. SUPPLIES POSTAGE: Add £2.50 
per order to UK addresses (except labels, see above). Abroad, add 10% of order value (minimum £3.50) for airmail delivery where possible. a 
PAYMENT:We can accept payment by cash, cheque (in Pounds Sterling drawn on UK branch of bank or building society), Postal Order, International Postal/ \eEyRocarRD 
Money order, Eurocheque, Payments in UK currency (Pounds Sterling), please, in cases of difficulty, contact us first to arrange payment method. 


We can accept payment by credit card (VISA, ACCESS, MASTERCARD, EUROCARD). Please state your card type, number, expiry date, address (goods must Scie eas 
be sent to cardholder's address) and remember to sign your order. Goods remain property of DJC until paid for in full. Our telephone number has an answering 


machine for when we are unable to answer in person — don't be shy! 
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NEXT 
MONTH 


DIY Toolkit presents array parameters 
and fast floating-point operations; we 
have that working comparison of three 
word-processors, which missed the bus ° 
this month, and we hope to start some 
‘notebook’ pages of short ideas to keep 
relations with your QL on an even keel. 





arking back to comments made 
about the hard disk backup pro- 
gram WinBack, it has been 
pointed out to me that this pro- 
gram (and its associate, The Gopher) do 
not Open files in a potentially-dangerous 
fashion, as Archive does. The latter pro- 
gram actually makes a change to a file 
when it Opens it, whereas neither of the 
other two programs does anything to the 
contents of an Opened file. As noted pre- 
viously, it seems likely that an aborted 
backup attempt, using Winback, was the 
result of abad area on the hard disk, rather 
than a corrupted file as such; had the 
problem been simple file corruption, itwould 
have been possible to re-copy the file 
when the backup halted, then re-com- 
mence the backup where it halted. If the 
process is restarted, WinBack passes over 
all the files which have already been backed 
up and starts copying at the file which 
caused the stoppage. Make sure the same 
backup disk is in the floppy drive. 





Preliminary V2 


A preliminary version 2 of Winback has 
been tested, but it did not have the file- 
splitting capability which will be in the 
released version. The intention is for the 
program to split single files between two 
disks, if the end of one disk is reached 
during backing up of a file. For the mo- 
ment, file compression is not planned for 
the good reason that such a feature is 
fraught with potential danger for the user’s 
files. In the long run, compression may be 
added, as it is otherwise a very desirable 
feature. At least one file-compression rou- 
tine is already available for the QL, sup- 
plied with the C68 compiler system. Those 
who are fortunate enough to have ED 
drives will not be too concerned about 
compression, since they won’t need many 
disks to backup a hard drive. 

A ‘dead’ QL was brought to me for inves- 
tigation recently. When it was switched on, 
the mono screen glowed with an unsteady 
light green and there was no sign of the F1/ 
F2 start-up display. There was an obvious 
choice of two areas to look for the fault — 
either the Qimi mouse interface was play- 
ing up, or the ZX8301 chip which handles 
the display interface was kaput. On the 
basis that one of the owner’s Qimis had 
caused trouble before, and this one might 
have to be ‘got at’ to prevent conflict with 
a Gold Card anyway, it was removed, but 


Bryan Davis 
reconsiders 
Winback, disturbed 
ribbon cables and 
mixed disk 
densities. 


the display was still useless. Changing the 
ZX8301 (the chip to the right of the large 
cpu chip) fixed the display, and the F1/F2 
screen appeared, but keying F1 had no 
effect. You can make a fair bet that this will 
happen whenever the QL is opened up, 
the cause being disturbance of the ribbon 
connectors to the keyboard. They don't 
make the best connections, and kink eas- 
ily when re-inserted. Kinking may break a 
lead. If a bit at the connector end has been 
bent over, cut it off cleanly with scissors 
and re-insert it. As an extra precaution, 
spray the terminals inside the connectors 
with contact spray — that is, a cleaner 
designed specially for electrical contacts, 
not any old spray. 

When you buy a replacement for a 
ZX8301 chip, it may come labelled 
CLA2310, which is alright; however, 
sometimes a particular ZX/CLA chip is 
unhappy working with the 68008 cpu chip 
— it might be necessary to do some chip 
matching. As to what causes 8301 chips to 
blow, there are a few theories, the most 
common being that the unbuffered con- 
nection between the chip and the display 





unit allows excess voltages from the latter 
to overload the chip. In the early days of 
the QL, we were warned by peripheral 
equipment manufacturers to switch on 
heavy-current units such as displays and 
printers before the QL was switched on, 
and to switch off the QL before the other 
units. This procedure ensures that the QL 
is ‘dead’ whenever excess voltage is fed to 
interconnecting wires. My own procedure 
for nearly seven years has been to have all 
units connected to the same multi-way 
extension socket and switch them all on 
and off together. That has not given any 
problems, but | must point out that my 
system has a variety of suppression de- 
vices fitted and there can, anyway, be no 
assurance that simultaneous switching will 
be satisfactory with any combination of 
units. The speed with which some units 
‘come alive’ could be much greater than 
for others. One thing you should note, if 
failure of the 8301 has occurred several 
times on your QL(s), is whether or not it 
happened when the system was switched 
on, rather than while it was working. 


Voltage surge 


If you have seen the blank screen only at 
switch on time, there is certainly good 
reason to suspect a voltage surge from a 
peripheral unit as the culprit; don’t forget 
that anything plugged into the 64-way 
expansion port is a peripheral unit — the 
display may not be the problem area. 
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Borrowing is ok, fora while, but one can’t 
expect the owner of a Gold Card to loan it 
out indefinitely; fortunately, I’ve finally got 
my own GC and can investigate what it 
does for the QL, on a day-to-day basis. 
Previous attempts to get a GC and my 
one-third height Mitsubishi 3.5in drives to 
co-operate had been unsuccessful, de- 
Spite a variety of settings for the FLP- 
_STEP 5 parameter. Other users had 
advised changing FLP_START instead, 
so that’s what | did with the new GC. It 
didn’t work. Back to FLP_STEP, just in 
case ... It was a good job the check was 
made, because the current GC — identified 
as ‘Gold Card 2’ underneath and with the 
pcb coloured red — seems to get on fine 
with these drives when FLP_ STEP is set 
(the default is 3); the FLP_START pa- 
rameter was left unchanged, at the default 
30. 


Combined disks 


Mention was made in the February issue 
of combining ED (extra-high density) or 
HD (high-density) and DD (double-den- 
sity) 3.5 in floppy disk drives with a Gold 
Card interface. The adapter which has to 
be fitted to the GC to enable this has two 
drive connectors, one pointing upwards, 
the other outwards (in the ‘conventional’ 
position). To avoid the necessity for chang- 
ing over drive designation jumpers (the 


ones that identify drives as flp1_, flp2_ 


etc), the straight-out connector is under- 
stood by the QL to connect to flp3_ and 
flp4_. Thatis, although the DD drives were 
previously always flp1_ and flp2_ when 
connected as the only two drives on the 
system (with either Trump Card or Gold 
Card), they have now become flp3_ and 
flp4_, without having to be fiddled with. 
The ED drives are plugged into the up- 
wards pointing connector, and they have 
become flp1_ and flp2_;theirinternaljump- 
ers also are set to flp1__ and flp2_. As 
mentioned above, the FLP_STEP param- 
eter has had to be reset, by a line in the 
system boot program, but that was solely 
to cure a disagreement between GC and 
DD drives. Otherwise, no fiddling was nec- 
essary, and all four drives are working fine. 
One (branded) ED disk failed to format first 
time, but was alright on the next try. At £30 
for 10, these disks are still rather pricey, 
but the value in terms of bytes per penny 
is good. 

There are some warnings given in the 
instructions with the GC and ED drives, 
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and they bear repeating here. If ED drives 
are connected to a Trump Card, they can 
be used only as DD drives (720 KB) and 
the TC has to be fitted with the version 1.34 
or later rom. When using either HD or ED 
disks in DD drives, cover over (with opaque, 
not transparent, tape) the square cutout 
opposite the write-protect cutout. DD, HD 
and ED disks have a write-protect cutout 
and slide in the same location, but HD and 
ED disks have an additional cutout on the 
opposite side (but in slightly different posi- 
tions). By covering up this cutout, you 
should prevent DD drives from failing to 
format the HD or ED disks properly. Don’t 
be fooled by an apparently-correct format 
operation without the cutout taped over; 
my own quick check did show both HD and 
ED disks to format properly in a DD drive, 
and it was possible to copy files to them 
from hard disk, then delete them, but neither 
disk was recognised when put into an ED 
drive. That is, you can do the formats but 
don’t expect compatibility between drive 
types unless the cutout is taped over. 
There may be some incompatibility even 
when the cutouts are taped over; while 
various WCOPY operations between 
drives succeeded on my system, others 
failed with the ‘bad or changed medium’ 
message being displayed, and there was 
no reason to suspect the disks being used. 
It may be advisable to match disks to 
drives —thatis, DD disks in DD drives, and 
so on. 


Rom version 


An ED disk formatted in a HD drive 
should give 1.44MB; presumably, the same 
advice — cover the cutout — applies here, 
too. For ED drives to work properly with the 
GC, the rom in the latter must be version 
2.22 or later. Remember that, although the 
GC can provide sub-directories on hard 
and floppy disks, the TC (and other inter- 
faces) cannot deal with sub-directories on 
floppy disks, so don’t switch disks which 
have sub-directories on them to systems 
which don’t have a Gold Card. 


Density needed 


My initial reason for wanting ED drives 
was the prospect of being able to load all 
system files from one disk. A single DD 
disk had long since proved too small to 
hold more than the bare necessities, but a 





disk with more than four times the capacity 
would be ample (for a while). A more 
pressing reason presented itself shortly 
before the ED drives arrived; something 
had gone wrong with the 20 MB MS-DOS 
‘partition’ of the hard disk, Conqueror 
couldn't start, and a backup of the hard 
disk was called for as a precaution before 
the partition was reformatted. The space 
taken by Qdos files had risen to over 12 
MB and it would have taken near to twenty 
DD disks to hold the backup copies; the 
actual number required varies with the 
backup program being used, and the posi- 
tion of files on the hard disk. If the backup 
program attempts to fill each disk, the 
number is kept down but, if it merely copies 
files in sequence, a big file which doesn’t 
quite fit the current disk will cause the 
remaining space to be unused. 


Hardback 


Back in the days of PDQL, a copy of 
Chas Dillon’s HardBack was sent for 
review, but had been put on one side for 
obvious reasons; now was a good time to 
try it. The 12.324 MB of files fitted comfort- 
ably onto four ED disks, leaving 456 KB of 
space unused. On the first three disks, 
only 2 KB remained unused, showing that 
the program had done an excellent job of 
filling the disks. As the data transfer rate 
for the ED drives is in the region of 1 
megabyte per second, compared to about 
a quarter of that with the DD drives, the job 
was completed in well under a half hour. 
Subsequent attempts to make back-ups of 
only those files which have changed since 
the full backup have not been successful; 
resolution of that problem will have to wait 
upon some spare time to read the instruc- 
tions again. 

Many micro users will be conscious of 
some slowness in their computer’s han- 
dling of certain jobs. The QL is perhaps a 
bit unusual in that it was created with a 
slow word processor program, Quill. Gen- 
erally, handling of text should be relatively 
fast, whereas graphics can be expected to 
be dealt with at a snail’s pace. It was 
unfortunate that Psion had to produce 
Quill at a time when they did not have 
anything like a ‘final’ QL available to test it 
on. It seems likely that — given time and 
money — they would have completely re- 
written the program, That is history, but 
users have now got the option to replace 
Quill with Perfection, and get both greater 


speed and more facilities, and/or install a 
Gold Card and have all programs run 
faster. 

It really is a pleasure to see things 
happening much faster on the screen 
when a GC is fitted. In my own case, 
arrival of the GC coincided with a very 
frustrating period trying to cope with the 
PC wonder-program Windows, and the 
contrast was marked. Using a WP pro- 
gram under Windows, on a reasonably- 
fast PC, there is frequently enough time 
available to have a cup of coffee —- maybe 
a light meal! — while one waits for some 
basic operations to be completed, whereas 
there are no significant pauses using Per- 
fection with the GC on the QL. The latter 
combination looks, and is, fast; the slug- 
gishness of two WP programs tried with 
Windows was such as to make it out of the 
question to use them on a daily basis. On 
top of this, there has been a period of eight 
weeks waiting for the world’s #1 software 
company (you guess the name) to explain 
how to make one of the WP programs 
work at its proper (slow) speed. We gen- 
erally get better service than this on the 
OL. 


Catching up 


QL software and firmware has yet to 
catch up with the hard disk, high-density 
drives and sub-directories. Since adding 
these to my system, there has been a lot 
of aggravation, stemming from commands 
which don’t work properly and programs 
which are reluctant to be configured to 
work from hard disk. The wild-card com- 
mands appear to work as and when they 
feel like it; WDEL seems to work, only for 
deleted files to reappear later, sometimes 
after several ‘deletions’, and WSTAT says 
‘not found’ to sub-directory files. Whether 
the problems noted relate to the com- 
mands themselves, to the interface or 
drives, to the use of a device driver to 
make sub-directories more usable, or to 
some other factor, | know not. Re- 
configuring text87 (version 3.00) and 
Professional Publisher has been a pain. 
Conqueror itself was ok, but the partition 
it was using on the hard disk became 
unusable. Can we hope that program- 
mers will start to make provision for hard- 
ware that has been available on QL sys- 
tems since 1990-1991? 

In case you are confused about the 
number of floppy disk drives you can 
connectto your Trump Card or Gold Card, 
note that there are two adapters sold by 
| Miracle for increasing the number of drives 
supported. Only two drives could be con- 
nected to earlier TCs, and the standard 
adapter for these cards increases the 
number to four. Later TCs supported four 
drives, so don’t need an adapter. The GC 
supports three drives, and the adapter for 
it raises this to four; this same adapter can 


be used on TCs, for the 2-4 conversion. 
There is only slight difference between 
the adapters, but the original one is not 
suitable for the GC; specify your interface 
type when ordering. 


Recognition needed 


Qdos can support eight drives, but the 
interface specification for disk drives does 
not normally permit this number. It is inter- 
esting to read that even the scsi interface, 
which should support many chained de- 
vices (of varying types), does not actually 
make it straightforward — in practice — to 
connect additional disk drives beyond the 
usual two or three. Miracle report that one 








ent 


of the Select lines on the ED drives is used 
for selecting density, thereby reducing the 
possibilities for drive selection. Atthe time 
of writing, my one QL is happily recognis- 
ing two ED and two DD drives when a 
Gold Card is the interface, but another QL 
recognises only one of each type of drive 
when a Trump Card is the interface. Bear 
in mind that the TC does not support HD 
or ED drives, except when they are used 
with DD-formatted disks. 


Height of confusion 


When referring to character heights in 
picas (one-sixth of an inch, a normal 
measure in the print trade), there is a fair 
chance of the inexperienced user getting 
confused, if he/she actually measures the 
height of printed characters. The normal 
height figures given, forexample, Helvetica 
72-point, refer to the total space taken by 
the characters, including space top and 
bottom, not to the height of the characters 
themselves. A ‘point’ is one-twelfth on a 


TROUBLESHOOTER 


pica. Refer to the illustration on the previ- 
ous page and the point should be clearer; 
there has to be space above and below, to 
avoid characters on successive lines 
touching each other, and a cell height is 
specified to allow for this. The character 
height is appreciably less than the cell 
height. In the case of text 87’s Roman 21- 
point fount, the characters are roughly 15 
points high. Additionally, printers do not 
necessarily use the same data for all 
founts of the same name. For example, 
there are a large number of variations of 
the Times fount, and you cannot be sure 
of the character point size for a particular 
printer set, without measuring the printed 
output. Equally, don’t expect characters 
of the same nominal point size, but of 
different founts, to be the same height. 
They vary enormously! The typical Times 
and Helvetica sizes used for correspond- 
ence fortunately differ only slightly in 
height; to get the same character height 
you have to use about 10.5 points for 
Times against 10 points for Helvetica. 

The super-large dictionary for Digital 
Precision’s Spelichecker will be supplied 
on two DD disks, rather than on one HD or 
ED disk. To enable this, files have been 
created for each of the alphabetic letters 
and a reconstitution routine has been 
provided to stitch them all together again 
as one dictionary. This routine actually 
has two options — make one complete 
dictionary, or two separate ones, more or 
less equal in size. It does the job quite 
quickly. Incidentally, don’t think develop- 
ment has stopped on Perfection; my 
current version is 3.07. There have not 
been major functional changes in the last 
few versions, so users of earlier versions 
need not get worried about missing 
something. 


Readers’ letters 


lf D. Shillam is still patiently waiting for an 
answer to the letter he wrote some time 
ago, now’s the time to pay attention. If you 
really don’t want to put printer control 
codes into the Quill Printer _dat file, you 
can insert them into documents instead. 
One way to do this is to use the decimal 
code 155, which looks to an Epson-com- 
patible printer like the ESC code which 
prefaces most printer commands. To put 
this into a Quill document, you simply hold 
down the CTRL key and tap the ; key (the 
semi-colon key). On the screen, this ap- 
pears as G-—anormal u with a ‘hat’ above 
it. You will almost certainly have to experi- 
ment with this. To avoid conflict with ex- 
isting Translate entries in your Printer 
_ dat file, take the disk/cartridge contain- 
ing that file out before printing, to force 
Quill to use its internal default_ dat file. To 
make sure the printer isn’t already storing 
instructions which you have forgotten 
about, switch it off and on to reset it. 
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MEDIA MANAGER SPECIAL EDITION 
MEDIA MANAGER 


Media Manager Special Edition (MMSE) Is a program to 


be used both when things have gone wrong as well as 
when things are perfectly OK. It allows for automatic, 
semi-automatic and manual correction of a huge variety 
of disk and tape problems. It allows you to explore disks 
and tapes to your heart's content, producing all sorts of 
different diagnostic reports. MMSE Is very simple to 
operate, being menu-driven and assuming no degree of 
computer knowledge whatsoever. 





MMSE also allows you to tidy, catalogue, sort and order 
your disks and cartridges. 


The standard Media Manager Is both less powerful and 
less user-friendly, but manages to work on an 
unexpanded QL. 


Both programs allow for data transfer between PC and 
QL. With MMSE, this transfer is at file and directory level, 
is bi-directional and is completely automatic. 


SPECIAL DESKTOP PUBLISHER 
DESKTOP PUBLISHER 


These programs are very primitive compared to 
Professional Publisher. However, if you have not 
experienced that program as yet, you will find both of 
these very competent. Both are capable of producing 
excellent results. The cheaper one has fewer features but 
is able to run on smaller systems. 


EDITOR SPECIAL EDITION 
THE EDITOR 


With the sole exception of Perfection, this is the best 
word handling system on the QL. Editor's features 
include an unrivalled degree of programmability and the 
ability to cope with the entire 256 character ASCIil set. 
The Special Edition has enhanced document-type 
facilities, including column blocks and on-screen page 
break displays. Neither program Is suitable for 
computing novices. Until Perfection, Editor Special 
Edition would have been our ‘Desert Island Program’. 


Editor SE can do a few things that Perfection can't, so 
the Ideal combination Is to have both (they are 
compatible at file level and can multitask). If you order 
Editor SE at the same time as Perfection, you can have 
Editor SE at half price. 


PROFESSIONAL ASTROLOGER 
PROFESSIONAL ASTRONOMER 


The Astrologer program teaches you Astrology from 
scratch and enables you to automatically produce text 
narrative on personality delineation, year-to-year and 
minute-to-minute life predictions, compatibility 
interpretations and so on. Whether or not you believe in 
astrology — indeed, especially if you do not — this 
program Is one that you cannot afford to have. You can 
tailor the readouts (both in terms of quantity and what 
is sald) to your own particular requirements. The amount 
of fun you can have with this program Is endless. Do not 
blame us if you start believing in astrology, though! 


Astronomer is an extremely fast and accurate solar 
system calculator, with planetarium views, planet faces, 
eclipses, cinerama display etc.. 


TURBO BASIC COMPILER 
SUPERCHARGE BASIC COMPILER 


Turbo Is the finest BASIC compiler for the QL and 
arguably the finest BASIC compiler for any computer! 


Turbo automatically converts working BASIC programs 
into optimised machine code, with no need for human 
intervention. The benefits of this conversion are vastly 
enhanced running speed (as well as much faster loading, 
encryption and automatic bug fixing for a variety of QL 
interpreter oddities). Typical speed-up Is 20x — 100x. 


Turbo Is provided with a 200 command toolkit, adding 
many useful commands to BASIC. Most of these 
commands will be of immediate use to the programmer, 
whether he Is a novice or an expert. There are commands 
to load strings and floats into RAM, and to extract them 
automatically; to search memory and to move its 
contents; to control jobs and change their priorities... 


Supercharge has a few of Turbo’s facilities and half its speed. 














TOOLKIT Il 


Toolkit Hi starts where Toolkit W stopped, adding about 
60 new commands and enhandng many existing dual 
functions. Toolkit Ill is available either on disk or on 
ROM, and works whether or not you have Toolkit Il. 


Toolkit Ill commands can, with only a couple of 
exceptions, be compiled using Turbo. 


QFLICK CARD INDEX 


All QL owners have a copy of Archive, supplied free with 
the QL. While Archive is competent, it Is very hard to get 
to grips with and is not particularly fast. QFlick presents 
a very convenient alternative — a snappy , simple-to-use, 
pointer-controlled card file database. You can move data 
between QFlick and Archive in either direction. 


OF lick Is not itself programmable but we document its 
data structure and give guidance on how to program it 
using Turbo. 


ARCHDEV + RTM 
DATABASE ANALYSER 
ARCHIVE TUTORIAL 
NAMES + ADDRESSES 
MAILMERGE 
DAT-APPOINT 
SEDIT 
SCREENPRINT 
RECOVER 


This suite of utilities will greatly enhance your use of the 
Archive database system. 


Archdev + RTM is a straight replacement for Archive: it 
gives enhanced speed, greater workspace and a much 
cleaner boot-up. All your existing applications will work. 


Database Analyser provides very fast and comprehensive 
statistics about your Archive databases. 


Archive Tutorial proceeds systematically through the 
whole philosophy and grammar of Archive, providing 
you with expert and patient guidance. 


Names + addresses, Mailmerge and Dat-Appoint are 
ready-to-run, off-the-shelf Archive applications, 
providing an address database, mailmerging and 
appointment diary respectively. You now have no excuse 
not to use Archive. 


SEdit allows you to create and edit screen format files in 
Archive. Screenprint allows you to print them out. 


Recover allows you to get back lost Archive databases, 
created when you switched off the computer without 
properly exiting from Archive. 


XREF 
SUPERBASIC MONITOR 
BETTERBASIC EXPERT SYSTEM 


XRef analyses the structure of a BASIC program, 
providing detailed reports on things like variable usage, 
what calls what, dynamic call hierarchy of procedures 
and functions, and so on. 


SuperBasic monitor actually monitors and reports on the 
performance of BASIC programs as they run under the 
interpreter. 


BetterBasic analyses and automatically corrects structural 
flaws In your programs and allows you to customise 
things like indentation, number of statements per line, 
filtering out of noise words, etc. 


The three programs together provide a matchless 
diagnostic and auto-correcting facility for BASIC 
programs. 


TRANSFER UTILITY 


This program copies files at high speed between devices, 
performing translates as it goes along. Ideal for all sorts of 
applications, including transfers from microdrive to disk. 




























QMATHS SYSTEM 


This Is an Incredible mathematical compendium for the 
QL. Pride of place goes to the symbolic problem solver: 
this can solve equations, simplify expressions, factorise, 
expand, etc, all symbolically. If you could sneak this one 
into a maths examination, you would have a formidable 
ally. QMaths knows about all the algebraic operators, 
powers, roots, brackets, trigonometry, matrices, 
determinants, vectors, factorials, permutations, 
combinations, binomials, exponentials, logarithms, 
hyperbolics, inverse functions, infinite series including 
Taylor & Maclaurin expansions, complex numbers, 
conversions, Fourier series, and lots of calculus: both 
differential and integral, including integration by parts 
and definite integrals. QMaths optionally displays its 
workings and comes with a superb interactive tutorial. 


The package also contains an interpretive, fractal, Image- 
generating language with loads of beautiful fractal 
programs supplied for you to use and edit -— no 
programming skill is required. 


There Is also a multiple precision floating point maths 
package, giving calculations at precisions up to over 600 
decimal digits of accuracy. 


There Is even more to this system, but we think we have 
told you enough. 


QMON MACHINE CODE MONITOR 


The latest version of Tony Tebby's superb monitor: an 
absolute must for those who really want to know what 
is going on In the QL. No other machine code monitor 
even comes close. 


Do not confuse this program with SuperBasic monitor, 
which monitors SuperBasic, not machine code. 


COMPARE 


This program compares files — data or program -— at 
colossal speed. Where a mismatch is detected, the 
relevant areas are highlighted and you can shuffle, 
displace and align very easily. 


CASH TRADER WITH ANALYSER 





PAYROLL 


Cash trader with Analyser Is an accounts system designed 
by businessmen and not by wretched accountants! 
Consequently, it has excellent reporting and 
management facilities, and is very flexible. It is aimed 
primarily at the layman, probably a sole trader running a 
small or medium sized business. All the features you 
would expect — including audit trail — are present. 


Payroll is a reasonably flexible system designed to 
automate the payroll function in small businesses. 


Both programs are configurable, with editable defaults 
letting you adapt the programs from year to year. 


HARDBACK WITH FINDER 


This is the ultimate hard disk backup and management 
utility, with all the sophisticated features you could 
want. User dialogue is via overlapping pop-up windows — 
the whole program just feels right. It is possible to scan 
the disk at great speed, too. 


PIKY @cole] ma ine meltile del hy¢ 


This permits you to add password protection to disks, to 
optionally increase disk storage capacity on DSDD drives 
by 36K and to Increase speed of access by as much as 
30%. All this is done while maintaining full compatibility. 
Automatic file management is also provided. 








DIGITAL C SPECIAL EDITION 





DIGITAL C 


These are extremely fast and efficient C compilers, 
complying with and dicey Rote Small C definition. 
The Special Edition goes much further, including support 
for structures, pointers, long pointers, >64K code size, 
direct access to QDOS traps, etc. The Special Edition C 
generates code that runs about twice as fast as the other. 





PERFECTION DATA SHEET #2 


MENU 1 


SNUVOKSAZCOMAOCPAWTWHAZHYH 


MENU 2 


MENU 3 


ANHCMOAUDMMPOAN ZO WO WH HAUYZArAnwwdoOmMPe VSNHmMoacH 


Load file 

Save file 

Merge file 
export blocK 
export flIle 
Forward search 
Backward search 
Replace 

replace All 
Query the replace 
toggle Case Sensitivity 
Emphasise on 
emphasise Off 
Underlined on 
Not underlined 
moVe block 

copY block 
Delete block 
Print document 
Zap document 
eXit program 


Italic on 

sUperscript on 

subsCript on 

italic/superscript/subscript Off 

Highlight (=strip 2) on 

highlight oFf 

back to Normal (strip 1, standard font, no 
emphasised or underline) 

reformat pAra 

reformat from top of para hEreon 

forced (=hard) paGe break 

spell Pages 

spell Block 

Spell as you type 

Reinstate line containing cursor 

cycle end of Line space insert 

toggle auto line/word Wrap 

Margins 

Justification 

Tabs 


THE INFORMATION PAGE 


active? * 


MA | 


A DIGITAL PRECISION 10 





ier at 





Ir 
* 


ns * set sizes 


normal 
set horizontal 


* normal time-out for 
* maximum 


colour * main 


error? * 
background colour 


goto 
goto 
goto 
goto 
Goto 


Top of document 
Bottom of document 
specified Line 
specified Page 
pointer 


Mark pointer 

cycle laZy screen 

reveal hidden Codes 

special transpArent insert 

edit Header 

edit Footer 

load printer Data 

set start (initial) page Number 
Quote and edit page length 

undo current Emphasised region 
undo current Underlined region 
undo previous strip change 

undo previous Superscript/subscript/italic change 
toggle Keeping of tabs on reformat 


STATUS LINE INDICATORS/FLAGS (DEFAULT = BLANK) 


COLumn number 
visible CHARACTERS count 
total PAGES 


CAPS 

NW 
CJ/RJ/LJ 
OV 


cS 
UP ARROWS 


LINe number / total lines PAGe number 
hidden/control CHARACTERS count 
LINE number WITHIN PAGE 

CAPSlock on (Lower case) 

No line Wrap (Automatic line wrap at right margin) 
Centre/Right/Left Justification (Both L+R justification) 

OVerwrite (Insert) 

Case-Sensitive search/replace (Case-insensitive) 

search direction backwards (Forwards) 

No Querying of replaces (Query prior to replacing) 

a Block is Defined (No block currently defined) 

LaZy/Very Lazy i.e. accelerated screen-handling (Normal screen) 

Keep Tabs always (Replace TABS with spaces when reformatting) 
SPellchecking as-you-type (Spell-checking off, or by line/page/file) 
insert 0/1 Spaces in EOL region (Insert as many spaces as necessary) 


Character code 
WORDS count 


SPELLCHECKER COMMANDS (other than those already in PERFECTION) 
1 


2 
2 


load 0/1/2 dictionary files (any combination of user and supplied) 
spellcheck a document file (Perfection or export) 
exit SPELLCHECKER 


DICTIONARY UTILITY COMMANDS 


Du Wwrhyore 


extract marked words from file/files/device, add to ASCII wordlist 
speedsort wordlist (removing duplicates), build user dictionary 
speedsort wordlist (removing duplicates) for editing in PERFECTION 
configure defaults for DICTIONARY UTILITY 

configure defaults for SPELLCHECKER 

exit DICTIONARY UTILITY 


PERFECTION CONFIGURATOR COMMANDS - see sideways-printed list 
PERFECTION STRIPSORT COMMANDS - c20 options, no space for details 


PERFECTION PRINTER CONFIGURATOR - c50 options 


inc 16 big translates + 4 strips 


with scrolling 


beep 


* auto line-split 
on 
delay 


colour * command window pape 


d 


* main window paper 
dow border colour * command window error 


keep pace 


* spellcheck to 


* subsequent keypress repeat 
colour * set default tab positio 


set window width * set window height * 


startup? 
* attributes to 
dow background colour 
* command window backgroun 


rror ink 
freely altered within CONFIGURATOR AND FROM PERFECTION. 


* centralise main window 


bute 


ndow on 


case-sensitive? * search backwards? 
delay 


* main win 
lves be 


lazy attri 
dow border colour 
lour * command win 
* command window e 
(full/top/bottom) * 


-out for 


* display menu wi 
ft page length 


te mode? * searching 
* initial keypress repeat 


tive? 


of main window 
dow * set vertical offset of window 


* quick time 


tab-replace ac 
length * so 
colour * main win 
colour * command window ink co 


PERFECTION priority 
Note that these preset defaults may themse 


PERFECTION CONFIGURATOR OPTIONS (continued) 


command window error paper colour 


* startup in overwri 
auto 

lazy attribute 
working line 

window ink 

and positions 
offset of win 


PERFECTION DATA SHEET #1 


STOP PRESS/PRODUCT INFO 


We are on the look-out for superb QL programs: our aim, to make them 
even better and then include them in our range. Write if interested. 


Please see the outside back cover for more information on PERFECTION 
and on other Digital Precision gear. Here's what PERFECTION does: 


DIRECT KEYPRESS COMMANDS 


TH SSS Smee oS ee a de Se ee OS a ama ga wR ee ae + 
| CTRL/ | CTRL/ALT/ 

-t-------------------------- ~~~ +---------------~-------- ~~~ + 

A cycle justification setting immediate replace All 

B goto Bottom of document Backward search 

C cycle job (QDOS) Copy predefined block 

D Define highlight as block Delete predefined block 

E Emphasised (bold) on Emphasised (bold) off 

F Forward search Footer edit 

G immediate search in direction | Goto line number 

H reveal Hidden codes Header edit 

I insert tab (QDOS) set Indent margin here 

J enter (QDOS) recall last entry (TK2) 

K insert hard=forced page break export predefined block 

L Load file(native/Quill/export)]| set Left margin here 

M Merge exported file Move predefined block 

N back to Normal (reset) spellcheck pages 

O italics/super/subscript Off spellcheck block 

P Print document to printer/file| goto Page number 

Q Quote / edit page length toggle Query before replace 

R Reformat this paragraph set Right margin here 

S Save file Spellcheck as you type 

T goto Top of document set Tab positions 

U Underlined on Underlined off 

V set replace string set initial page number 

W put replace string here toggle word/line Wrap setting 

X immediate replace in direction| exit PERFECTION 

Y italics on toggle case sensitivity 

Z undefine current block Zap (i.e. clear) document 

wenn ene ------- = - +--+ tan --------- ~~ 

TAB insert TAB 

ENTER mark end of paragraph 

CTRL/ POUND special transparent insert 

CTRL/SHIFT/\ split very long lines 

CTRL/SHIFT/ | cycle EOL space insert 

CTRL/SHIFT/POUND cycle lazy screen 

CTRL/SHIFT/ESC wait for keypress 

ALT/CAPS communicate with SPELLCHECKER 

CTRL/CAPS communicate with PROPUB_INSERTER (picture inclusion) 

CTRL/ALT/CAPS load printer data 

SHIFT/CAPS reformat paragraph from here 

SHIFT/ALT/CAPS reformat hereon down through whole document 

CTRL/SHIFT/CAPS load macro from predefined block 

CTRL/SHIFT/ALT/CAPS export file 

CTRL/F1 remove the emphasis of this region 

CTRL/SHIFT/F1 undo previous italics/superscript/subscript change 

CTRL/F2 remove the underlining of this region 

CTRL/SHIFT/F2 undo previous strip change 

CTRL/F3 execute macro 

CTRL/SHIFT/F3 load macro file 

CTRL/F4 superscript on 

CTRL/SHIFT/F4 subscript on 

FS clear previous command prompt 

CTRL/SHIFT/F5 display alternate status line 

SHIFT/TAB toggle keep/replace tabs 

SHIFT/ENTER undo changes to current line (reinstate) 

SHIFT/ALT/1-8 mark Pointer 1-8 

ALT/1-8 goto Pointer 1-8 

ALT/F1-F4 set strip 1-4 (l=normal, 2=highlight) 

SHIFT/ALT/+ set search direction to forward 

ALT/- set search direction to backward 


All other ALT keys available for customisation: use the MENU option where a 
direct PERFECTION keypress clashes with a non-configurable TASKMASTER key. 























----- top th ee far a ata a fan a seep Sma ew nnn finn pee ae Shaws eee ser es aay 
|SHIFT| CTRL |ALT | CTRL/SHIFT|SHIFT/ALT| CTRL/ALT | CTRL/SHIFT/ALT| 
----- s deaiaaneean ae wench See leans sli a la et De ee ese |e IE 
UP by | by cursor| by |alter case|by screen| goto top delete line | 
/DOWN|line|para |static|page| of word depth jor bottom |cursor up/down 
----- Po Wee mwas SP Sa SS Se pea ae Pee SSeS e Shee en een f nn ce eeeeR i eeaRESE eno eens 
RIGHT| by by delete| to delete by screen|search for|delete to EOL 
/LEFT|char|word char | EOL word width |highlight |right or left 
----- PR mad mea mm Ee Po omin Lise Liss Sas Shae eee seed} ewan Semeat ae ese ames 
INDIRECT (i.e. MENU) COMMANDS 
TOP (DEFAULT) MENU 
Fl Toggle Help 
F2 Toggle menu visibility 
F3 cycle menu 1-2-3-1 
F4 Refresh screen 
F5 Switch between windows 
SHIFT/F1 Re-perform last command 
SHIFT/F2 Toggle L/R menu visibility in Mode 8 
SHIFT/F3 cycle menu 3-2-1-3 
SHIFT/F4 Resize/move windows 
SHIFT/F5 Toggle Single/dual window mode 
ESC Cancel command, escape from sequence 


ALT/F5 Toggle Overwrite/Insert 


PRESET DEFAULTS) 


PERFECTION CONFIGURATOR OPTIONS (i.e. 


Screen Sizes and Positions * 


Names * 


y jm) 


MVIGITAL PRECISION: 10 





p 
t 


* Tab Positions * 
Emphasised Ink Colour and 
colour for 


and Device Names * Font 
action 0/1/S * startu 


ers 


y * 
Update PERFECTION? * ink 
* current default font device name * 


printer data device and file name * curren 
pt font * current name for the subscri 


p Priorities * File 
name 


* Lazy Screen Paramet 
FECTION Job Priorit 


Baud Rate * Exit * 


ys 
colour * default end of line 


* current 


* current default device and/or file 


current name for the standard font * current name for 


font * current name for the italic font * minim 


gins * PER 
pes 
me 


* 


Autorepeat Dela 
ghlight strip 2 colour * alter stri 


and Mar 


Lengths * 


Screen Colours * PERFECTION Cleanu 
ication 


and Page 
ppending to Lines 
printer device or file na 


* Action when A 


Maximum Line 
Miscellaneous Parameters * Justif 


macro file name * current 
help device and file name 


Strip Colours 
emphasised * hi 


CJ C 


pt 


maximum priority for 


the superscri 





gin * indent margin * 
--contd 


* 


y screen acceleration factor 


CTION cleanup job 
* right hand mar 


hand margin 
ration? * laz 


priority for PERFE 
left 


um 


justification * 
? * suppress very lazy screen accele 


job * default 


PERFECTION cleanup 
suppress lazy screen 


169.95 eT PC CONQUEROR WITH DR-DOS v5.0 
129.95 dT PERFECTION PLUS WITH SPELL CHECKER 
119.95 eT THE SOLUTION WITH DR-DOS v5.0 

99.95 cT CPORT WITH C68K COMPILER 

99.95 cT CASH TRADER v3.0 + ANALYSER 

89.95 dT PERFECTION 

89.95 eT PC CONQUEROR ~ 

89.95 cT PROFESSIONAL PUBLISHER 

89.95 cT CPORT BASIC TO C TRANSLATION SYSTEM 
79.95 aT TURBO BASIC COMPILER + TOOLKIT 


69.95 aT PROFESSIONAL ASTROLOGER WITH ASTRONOMER 
CPORT BASIC TO C CONVERTER 59.95 cT QMATHS MATHEMATICAL SYSTEM 
59.95 aT PROFESSIONAL ASTROLOGER 
This program translates SuperBasic programs directly into C source code, automatically. 49.95 +aT LIGHTNING SPECIAL EDITION 
This C source code may then be edited or compiled. If you want to move programs to C 49.95 eT PROFESSIONAL PUBLISHER TOOLBOXES (PAIR) 
for migration to other hardware, or want to accelerate your programs, or just want to 49.95 eT ACT SPECIAL EDITION 
learn C the easy way (chuck BASIC in one end and examine the C that spews out of the 49.95 dT THE EDITOR SPECIAL EDITION 
other), CPort is the system for you. 49.95 dT SPELLCHECKER 
49.95 dT MEDIA MANAGER SPECIAL EDITION 
CPort is friendly and tolerant of poorly written BASK. There is even a method of dealing 
with unusual BASIC keywords. The conerated C, which can be switched between the 49.95 dT 3-D PRECISION CAD SYSTEM 
ANSI and Lattice industry standards, is very readable and is often optimal. CPort's user 49.95 cT PAYROLL . 
interface Is extremely friendly. CPort Is available with or without the C68 compiler. 49.95 cT HARDBACK + FINDER 


49.95 bT SUCCESS 
SUPERFORTH COMPILER WITH REVERSI 


49.95 aT DIGITAL C SPECIAL EDITION 
44.95 +a TOOLKIT III WITH ROM 

Forth is the most logical computer language. This compiler produces multitasking code. 

The manual teaches you Forth-83 from scratch. 


SPECIAL DEALS 


5% off total if you buy 2 programs/upgrades; 
10% off 3; 15% off 4; 20% off 5; 25% off 6+ 
Upgrades cost difference in price + £10 
Non-UK Europe add 5%, rest of world 10% 


For full terms and conditions, please refer to any of our QL World ads from Jan—Now 1990, or write in including a SAE 









39.95 eT THE SOLUTION 

39.95 dT IDIS SPECIAL EDITION 

39.95 ct SPECIAL DESKTOP PUBLISHER 

39.95 at QHON MACHINE CODE MONITOR v2.05 
39.95 aT wa COMPILER WITH REVERSI 










eae aT —Q 
34.95 d MICROBRIDGE 
IDIS SPECIAL EDITION 29.95 eT MEGA DICTIONARY 
IDIS 29.95 fT PROFESSIONAL ASTRONOMER 
29.95 eT PROFESSIONAL PUBLISHER TOOLBOX 
These intelligent disassemblers make the otherwise terrifyingly complex task of 29.95 eT PROFESSIONAL PUBLISHER TOOLBOX PART TWO 
understanding other people's machine code programs absurdly easy. The SE version, 29.95 TOOLKIT III 


which has a higher hardware requirement, sorts out some routines, replaces addresses 29.95 SUPER SPRITE GENERATOR 
with names, untangles data from code and much more. 29.95 SUPERCHARGE SPECIAL EDITION 


a 
| 
29:95 a QFLICK CARD INDEX SYSTEM 
a 
a 
QKICK FRONT END SYSTEM 


PERFECT POINTER TOOLS 

GAMES COMPENDIUM (ALL FIVE GAMES) 
This is a simple, easy-to-master, pull-down menu controlled multitasking front end. QKick 
runs In the background and can be called up at any time. It provides you with notepads, 


29.95 at THE EDITOR 

29.95 at DIGITAL C COMPILER 
sophisticated file/sector/RAM handling, backing up facilities, a cock, diary, calculator, 
mini-database and so on. 















29.95 aT XREF v2.0 

29.95 aT SEDIT 

29.95 aT ARCHDEV + RUN-TIME MODULE 
24.95 f SUPER ASTROLOGER 

24.95 d DESKTOP PUBLISHER 

24.95 a QKICK MULTITASKING SYSTEM 
24.95 a MEDIA MANAGER 


PECIAL EDITION 24.95 at IDIS INTELLIGENT DISASSEMBLER 
ADVENTURE CREATION TOOL SPEC O 2 4 95 at SUPERBASI Fate 
ACT is a must for every programmer. The name of the program Is misleading, Insofar as It » a GHTN 
has capabilities far beyond the 'mere' creation of adventures. ACT has utilities providing 24.95 aT BETTER BASIC EXPERT SYSTEM 
animated graphics, data compression, language design, parsing, maps, object-oriented 19.95 eT FONT ENLARGER 
control etc. If all you want to do Is generate adventures, though, you do not need to be 19.95 dT NAMES AND ADDRESSES 
a programmer to use it. This is a purchase you will never regret. 19.95 dT DAT—APPOINT 


19.95 b DISKTOOL WITH QUICKDISK 
19.95 aT ULTRAPRINT 


19.95 aT SCREENPRINT 
PEDIT 19.95 aT RECOVER 
19.95 aT PEDIT 


A fast, modern and capable printer driver for the programs bundled with the QL. 19.95 aT MAI 


LMERGE 
19.95 aT DATABASE ANALYSER 
COMPARE 
MICROBRIDGE 





19.95 aT ARCHIVE TUTORIAL 
9.95 ff SUPER BACKGAMMON GAME 












9:95 f DROLDZONE GAME 
Superb contract bridge bidder (ACOL etc) and player, using millions of random but : 
reconstructable hand Microbridge also includes a tate of the art Interactive bidding 9.95 f BLOCKLANDS GAME 
tutor and a clear instruction manual. There Is nothing like this anywhere else! 9.95 f£ ARCADIA GAME 

9.95 eT GRAFIX 

9.95 b TRANSFER UTILITY 


* KEY: + As well as mdv disk, you get a ROM 
Available either on mdv or disk 
Available only on disk 
Minimum 512K RAM:only available on disk 
Minimum 256K RAM:either mdv or disk 
Minimum 256K RAM:only available on disk 
Available only on adv 
Minimum 1.5M RAM:only available on disk 

T Compatible with THORs including XVI 

t Compatible with all THORs except XVI 


Ld Se ie) Relcy 3 


A very cut-down version of Professional Astrologer — still great fun, though! 


SUCCESS CP/M EMULATOR 


Allows your QL to run CP/M programs at great speed. 





OP AD EO SF & 





Send to: DIGITAL PRECISIO 
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CatdNo. Expiry: Signed: 


Delete as appropriate: (QUTHOR/STQL)(MDV/3.5"/5.25")(Disk=360/720/1440/2880/6400 sectors; nb 1 sector=0.5K)(If 720 sectors: SSDD/DSSD) 
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QL MAGIC 


When a friend of mine is gritting his teeth 
over his QL, and | ask him what | can get 
him to ease the pain, he says i me 
Yo) nal=mait-\e| (ome 

What he means, of course, is that he 
wants the program, or the printer, or what- 
AV =} a EM ol Ufofe tare malian to stop Ul ailatem-late, 
elem ola dalek 

WM EYo | Com FW A=V ai at-lalehVmtaliate mim ice) e can 
get it. That is why | am thinking of calling 
a new QL World column ‘QL Magic’. It 
Vo) aM mmal=l/om\ColUmielgnm’cell) am (-y-\-jamr-helelaic=) 
a} (=Yer=Wao) am al =) e) at=\"\Ma lal come: Mm igele Mam oll) mui amtat-hy 
at=}| oMtfolURComtelaam-m ollemeym-me)aelele-liiminivon:| 
ULT=3 10] ML (1a Pe) meme (=) Mee) anl=vialiacemmanenulale 
ial Cod aM ar- Kom el-\-1amele)iavem-Mer-lai(-)(emel-1) eis 
your best persuasions. 

Toma (Mai I] My ol-mm el al aliiate mcdale)a am olg-(eqi(er-] 
suggestions and programs which people 
have found helpful in unsticking the chew- 
ing gum in the works of computer life 
(even a remedy for removing real chew- 
Tale Me [Ulusme-yarelel(om-relast-lelelehYmerelanl-melemWilig 
We folele Ke) al-ma Blo) aMe-1-) @Ul-aroni-\-1alemialelelel stam 

im YColO marc \V(cm-lahVMeri-1i0| Ma) etme) maeleliial-t-m 
send them in. See below for a guide to 
EMT ale Me) bl a@-ladtel(-1-e 


EXPERT HELP 


The good news is: an eminent-member of 
the QL hardware community has prom- 
ised us to have a crack at some of the 
knottier hardware queries we receive. He 
is, like most of the expert hands in the QL 
business, an immensely busy person, so 
his offer is very much appreciated. If you 
have queries to shed, prepare to shed 
them now. Help us, and keep them as 
concise as you can. One query per letter, 
please, to keep things simple. 


e718) |3) = 
FOR AUTHORS 


By popular request, here are some 
guidelines for readers sending in 
1a d(eq(=t-M fe) mm eles-t-}]e)(-melele)i(er-iile) ab 

We take TEXT in the good old- 
ickjal le) at=ye Mc: hYamme) alm oy-|el-1mmme(elble)(-tillat- 
spaced, one side only. Leave atleast an 
Taleiame)mutt-lsellam-limaclelacomm uc Mm igit-meol bls 
own sub-heads, so only include them 
as a rough guide. Put your name and 
address at the start of the article. 
LISTINGS, on the other hand, must be 
single-spaced and printed to a width 
which will allow us to print them to a 
reasonable size within (usually) half the 
VT iteltame)meleim ey-(e(-muOl-y-M\folblmielelel-ai-lalm 
FTerexe) geil atve mm Comm '(olll am cla lal(-) mma, ol-mmm Bal-)\ 
must be on separate white sheets, and 
oF @=laleleleiam coma) e)geleleler-mer(-t-lahia 

Don’t send disks or mdvs unless we 
request them. 

We PAY around £60 a printed page, 
varying slightly with circumstances. We 
don’t pay for news items unless the 
writer is unconnected with the matter 
lel-Yiale Mm a-) ele) at-vemmr-lavem (eli hvame (Oley @relsmagl= 
mark. Such items are always bylined 
(and rare). 

We don’t pay for Open Channel, of 
foto] 0] g-y- mo] 0) M'(-Mele)ai mi al-jt-)m\e) mele] b]e) (= 
space it (or even type it) either. 

For a more detailed factsheet, send 
an SAE to the Editor. 


ThinkZ 
Superchip 4 


TK 


PSION ORGANISER 2 


Model LZ 

Model LZ 64 
Comms Link 
Comms Link — Mac 
Travel Pak 
Harvester Superchip 
Letter Organiser 
Informed Organiser 
Diary Link 

128k Datapak 

64k Datapak 

32k Rampak 


SPARES 


Keyboard Membrane 

JS ROM set 

ZX 8301 

ULA ZX8302 

MAB 8049 

QL Power Supply 

MC 68008 

M/drive assembly-(complete) 


Microdrive Assembly (exchange) ..£21.50 
Voltage regulator (high output) 


QPower Regulator 
QL Test kit 
Repairs 


SUNDRIES 


VDU cleaning kit 

Disk Cleaning Kit 3.5" 
10 Microdrive cartridges 
100 Microdrive labels 


Centronics Interface ...£22.25 
128K Eprom Pak £28.00 
128K RAM Pak £38.75 
Z88 Computer £223.00 
512K Ram Pack £103.50 
256K Eprom Pack £68.25 
1Mgb Ram Pack 
Squeeze 88 
Superchip 3 

Z88 QL Link . 


£133.50 
£27.50 


BUSINESS 
Project Planner 
Sales Invoice 
Small Traders Pack 


Stock Accounting System 


£41.00 


TEXT 

Master Spy 
Page Designer 2 
Perfection 


The Editor 


The Editor Special Edition 


£50.00 


FINANCE 


Home Finance [Buzz] ....£22.50 


Investment Monitor 
CAD 


GraphicQL Plus 


TechniQL 


£5.00 Technikit 


The Painter 
3-D Designer 
3D Precision 


PROGRAMMING 


Assembly Workbench ....£25.50 


Basic ally 
Better Basic 
Digital C 


128k Flash card 


Digital C Special Edition£50.00 


IDIS Special Edition £40.00 
Macro Assembler - GST ... £39.00 


Lightning Special Edition . £60.00 
Locksmith 

Mailfile 

Media Manager 

Media Manager Special Edn 


£19.50 
QFlash Ram Eprom £25.50 
QFlash Ram Utilites 


Sidewinder Deluxe ; 
Super Toolkit 2 (Eprom) .... £30.00 
Super Toolkit 2 — Reconfigurable 


Touch Typist 
Ultraprint 
XRef 2.00 

4 Matter 


LEISURE 
Bridge Player 2 
Cosmos+ 
Flight Simulator 
Matchpoint 


128k Computer ....£200.00 256k Computer ....£250.00 
£40.00 256k Flash card 
512k Flash card ...£120.00 1MgB Flash card .£200.00 


£70.00 


£80.00 


COMPUTERWARE 


the QL stockist 


Tel: 0303-81-2801 


SOFTWARE 


Micro Bridge 
Prof Astrologer + Astronomer 


Prof. Astronomer 
Snooker 

Strip Poker 

Super Astrologer 
Super Backgammon 3 
Type 22 

War in East 


GAMES 
Aquanaught 471 
Arcanoid 

Stone Raider 
Brain Smasher 
Crazy Painter 
Deathstrike 
Firebirds 


Hoverzone 

Jungle Eddy 

King 

Land of Havoc 

Lost Pharoah 
Stone Raider 
Super Arcadia 
Cuthbert in Space 


UTILITIES 

Archivist 

Archivist MP 

ArchRTM+ArchDEV 

Cartridge Doctor 

Conqueror MS-DOS 4.01 
£125.00 

Conqueror with DR-DOS 5.00 .. 


Discover 

Lightening ; 
Super Forth + Reversi ....£40.00 
Super Sprite Generator ..£31.00 
Supercharge Special Edition .... 


e Please telephone for details of other products not listed here e 


Discs 3.5" 10 DSDD (branded) .£26.00 


Power Clean Mains Filter 
Psion 2.35 Set 

Printer Ribbons 

Tandata QCOM set 
QUIMI I/F with mouse 


ALL PRICES INCLUDE VAT. U.K. POSTAGE £2.50 PER ORDER. 
maalelarsWie)m@e(=ircll (sme) me) a(>) am @) lm 0) cole [0 (e]tcm@)n Mc1-1p[0 Mey a\ man (0]m@0)0] mi tol(ck<) mereltllele|U [op 
Credit card phone orders accepted, or send cheques, postal orders, Eurocheques, t 


£24.50 


Z88 Ref Manual 
Z88 Magic 
Z88 Pipedream 


Access 


Assembly Language Prog 
Z88 Dabhand Guide 


Using Your Z88 

Z88 Computing 

Z88 Software DLV Guide 
Using Psion Organiser 
Psion Handling Book 


AMERICAN 
EXPRESS 


- WE EXPORT WORLDWIDE 














Progs Van Auwera have up- 
dated two of their longstanding 
product range. First off, 
Datadesign has been exten- 
sively revised so_ that 
programing it via SuperBasic 
is ‘much easier’. The SuperBasic 
interface has been considerably 
simplified; the old interface can 
still be used by those who pre- 


fer itand have invested time in 
it, though. Extra commands 
have been added; MERGE al- 
lows the program to merge files 
almost as fast as it loads them; 
FIND and FILTER are im- 
proved. More information is 
available from Progs Van 
Auwera. 

The Painter has also been up- 


Third time cute 


“Compare these speeds’ say 
Digital Precision about Per- 
fection 3.00 —- instant 
navigation, searching ap- 
proximately 100 pages (100K) 
per second, block handling 
about 20 pages per second, on 
a standard QOL. ‘Four to five 
times faster still’ with a Gold 
Card.“Who needs Perfection?’ 
asks a little man in the corner. 
‘Perhaps youneed Perfection’, 


say Digital Precision. Why is 
the little man wearing baggy 
spotted trousers, a funny hat 
and a leaky handbag (or is ita 
bucket of water)? Does he ap- 
preciate cute menus and good 
coding? Who is AT, anyway? 
Perfection 3.00, £79.95, or 
£119.95 with the Spellchecker, 
from Digital Precision, 222 
The Avenue, Chingford, 
London E4 9SE. 


Mouse in MUG 


seen in 
Merseyside 


OL MUG (Merseyside User 
Group) has contacted OL 
World to say that they are 
still flourishing. Formerly a 
Quanta subgroup and still 
affiliated, QL MUG is open 
to all OL users in the area. 
They also design and pro- 


duce (in kit or ready-built 
form, or parts list, and points 
in between) the Merseyside 
Mouse for the OL, which has 
been building its market in 
1991. Contact Mr James at 3 
Barnard Road, Birkenhead, 
L43 1TT. Tel: 051 652 7366. 
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dated. It will work with the 
cursor keys on the Gold Card; 
there are new printer drivers 
for the HP DeskJet and other 
printers which use to HPGL 
graphics language, for both 150 
and 300 dpi print resolutions. 

Current prices of the major 
programs in Belgian francs and 
Sterling are: The Painter 4.04, 


FF 


JES CENE! 


DataDesign and The Painter 
get a remodel 


BEF 1500 (£25); The Clipart BEF 
600 (£10); Qractal BEF 1200 
(£20); Datadesign 2.05 BEF 3000 
(£50). 

For other prices and upgrade 
prices and conditions, contact 
Progs Van Auwera at 
Haachtstraat 92, B-3020 
Veltem, Belgium. Tel: 010 32 
16 488952. 


admission with this voucher 
to one 


ALLFORMATS COMPUTER 
FAIR 


February National Motorcycle Museum, M42 J6 
March City Hall, Candleriggs, Glasgow 
March Horticultural Hall, GreycoatSt., Westminster, 


London 


March Brunel Centre, Temple Meads Station, Bristol 
March Donington Park, M1 J24 
March University Sports Centre, Calverley St., Leeds 


The All Formats Computer Fair is owned 
and organised by Bruce Everiss, PO Box 71, 
CV33 OXS. 


Sole agent for advance tickets and stands: 
JRMH Tel: 0225 868100. Normal entrance 
£4, with this voucher £3. Only one voucher 
per person. No cash value. Valid till end 
March 1992. 





(}PEN WHANNEL 


Open Channel is where you have the 
opportunity to voice your opinions in 
Sinclair QL World. Whether you want to ask 
for help with a technical problem, provide 





I always turn to your Note- 
book for up to date information 
and a little light entertainment 
on receiving QL World. Your 
January effort was unusually 
doleful, however. The literary 
quality of the magazine is far 
superior to other journals with 
a technical or specialist con- 
tent. 


14 


In reply to the cryptic remark 
in your penultimate paragraph, 
the top half of page 39 in the 
December issue is a reprint of 
page 46 of the September issue. 
Also, we have too many ‘m’s in 
systematic on the Contents 
page, and on the Noticeboard 
page the paragraph heading C 
COMPILER has its P missing. 
The heading of the article on 
page 36 has ‘questionnaire’ 
misspelt twice with only one 


7 POS 4 





somebody with the answer, or just sound off 
about something which bothers you, write 
to: Open Channel, Sinclair QL World, 
116/120 Goswell Road, London EC1V 7QD. 


However, this gives me an 
excuse to write and wish you 
every success in Overcoming 
any difficulties you may have 
in publishing, printing and dis- 
tributing the magazine in these 
difficult times. Iam too old to 
learn another language, and 
wish to continue using the QL. 

Wishing you and your staff a 
peaceful and prosperous 1992. 

Douglas D Perry 
Walsall 
W Midlands 


Editor's comment: What a nice 
letter. Christmas passed without 
anybody upending anything over 
anyone, although there were a few 
stern words spoken at home about 
how many days work we could fit 
in between 9pm on Thursday and 
4pm on Friday. Just returned from 
a much-needed week's holiday in 
the snow, lam greatly cheered up; 
also by knowing that whatever 
went wrong on January or Febru- 
ary, it can’t match December; also 
by this letter. No banana on the 
half-page, though. The first caller 
was Bryan Davies, wanting to 
know if he gets paid again for it. 
We said, not unless he can explain 
how it got there. Then there was 
the conversation about question- 
naire, with the OED being 
produced to prove that you can 
spell it with one “n’, and various 
proofs on my behalf to demon- 
strate: that’s all very well, but I 
asked for two. Words were spoken, 
but not too many, however; the 
setters are just as short of hands 
and eyes as we are. The extra ‘m’ 
in systematic I achieved all by 
myself, without any help; it was 
certainly noticed (too late, as 
usual). The mystery boob, how- 
ever, remains mysterious. 


I am a Scrabble fan, and pos- 
sessed the version as marketed 
by Leisure Genius for the OL. 





Unfortunately I have corrupted 
my copy, because I neglected 
to remove the cartridge and 
clone from the machine before 
switch-on. As a result the 
microdrives whirled into ac- 
tion and corrupted the main 
Scrabble cassette on mdv 2. 
To my dismay I find that Lei- 
sure Genius no longer trades, 
and the gameis no longer avail- 
able. Since I’m unemployed I 
really enjoyed alatenight game 
in preference to watching tv! 
Could you advise me how | 
can obtain this game for the 
OL? 
Barry Hammett 
Swansea 


Editor's comment: Nobody is list- 
ing this game at the moment. If 
anyone can help, please write to us 
and we will pass the offer on. 


There have been several que- 
ries recently concerning the 
connectors used for the R5232 
ports and Control ports—many 
people seem to think these con- 
nectors are not freely available. 
This is not the case. 

These connectors are pro- 
duced by Bicc-Vero Electron- 
ics Ltd, and are sold through 
the STC group of companies. 
They are available in any col- 
our you likeas long as it’s black. 
There are four different types 
available: four way left or right 
handed, and six-way left or 
right handed. The OL uses six- 
way left handed for the Con- 
trol ports and six-way right- 
handed for the RS232 ports. 
The Bicc-Vero part numbers for 
these plugs are 900-71053C and 
900-71088). 

A wire-stripping toolis avail- 
able under part number 900- 
71019A and a termination tool 
under partnumber 900-71020B. 
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BIORHYTHMS 


ave you ever wanted to make 

more use out of Psion Easel 

graphics software than merely 

plotting your monthly income 
and expenditure or tabulating yearly rain- 
fall statistics for the British Isles? 

The following is an Easel application 
which plots biorhythm curves for any 
period, past or future, and requires only 
three formulae to be typed in. It also ex- 
plains some simple mathematics and once 
again demonstrates the impressive power 
of the Psion software. 

Biorhythms are curves showing 
sinusoidal patterns of physical, emotional, 
and intellectual energy on a daily basis, 
and are claimed to bea guide to periods of 
both well-being and stress in all three 
spheres. They arose out of the research of 
Dr. Wilhelm Fliess in Berlin at the begin- 
ning of this century, later supplemented 
by Alfred Telscher, an Austrian professor 
inthe 1920s. Beginning at birth, biorhythms 
oscillate with regular periods of 23, 28, 
and 33 days respectively. In examining 
the curves, it is important not only to note 
the days when they are at their maximum 
Or minimum values but also on which 
days they cross from positive to negative 
or vice versa. These are known as critical 
days and are the times when you are most 
likely to be on edge and make mistakes 
and wrong decisions. 


On your cycle 


To know at which part of each cycle you 
currently are, youneed to know two things: 
your age in days and how many complete 
cycles have already elapsed. The first can 
be worked out with a calculator, taking 
account of leap years and the fragments of 
years for the current year and the one in 
which you were born. A much simpler, 
and readily available, method is to use the 
days( ) function in Archive or Abacus. Let 
us assume today’s date is 1st July 1991 and 
your birthday is 23rd May 1955, simply 
load Archive and type in: 


print days(“1991/07/01”) - days(“1955/ 
05/23”) 


In Abacus, omit the word ‘print’. Pressing 
Enter gives the result 13,188 days. It is 
essential to include both your birth date 
and the target date, so add 1 to the above 
result to give 13,189 days. You could also 
use SuperBasic, but only if you were born 
after 1st January 1961, since SuperBasic’s 
DATE function only returns correct values 
for dates after this. For example, if your 
birth date is 29th February 1968 enter the 
following short program: 


100 SDATE 1991,7,1,0,0,0 : today=DATE 
110 SDATE 1968,2,29,0,0,0 : birthdate= 
DATE 

120 PRINT (today - birthdate) /86400 + 1 
130 SDATE 1991,7,1,0,0,0 :rem reset the 
clock to whatever is the correct time 








PSION 
WAVES 


Nigel Bates takes a headlong plunge into 


biorhythms through the medium of Psion 
Easel - can it see into the future? 


If you have Minerva then you can enter the 
following directly: 


print (DATE(1991,7,1,0,0,0) - 
DATE(1968,2,29,0,0,0))/86400 + 1 


where the value in seconds returned by 
the DATE function is divided by 86400 to 
convert it to days and 1 added as ex- 
plained above to give the result 8,524 days. 

We now have all the information we 
need to construct the biorhythm curves in 
Easel. The QL User Guide tells us thata sine 
wave can be drawn in Easel by using the 
formula: 


sinewave = sin(2*pi( )*(cell-1)/(cellmax- 


1)) 


where ‘cell’ is the name of a set of figures 
always in Easel which has the value of the 
cell number eg its value at Jan is 1, at Feb 
is 2 and so on. Cellmax is a reserved word 
with a value equal to the number of cells 
currently displayed on the screen, and so 
is useful for scaling expressions along the 
label axis. Thus the above formula will 
draw one cycle of asine wave irrespective 
of the number of cells on the screen. A 
point to remember is that if you increase 
the number of cells after the sine wave is 
drawn, by pressing the TAB key to move 
the cursor off the right-hand edge of the 
screen, Easel will not extend the curve into 
the new area of the screen. You need to 
type the formula in again to do this. 

There is a problem in that we really want 
to have three biorhythm sine waves, with 
their different periods, on the screen si- 
multaneously, and so we cannot use 
cellmax. The sine function, like all the 
trigonometric functions, is periodic and 
repeats after 360 degrees or 2 radians. So 
the formula: 


Physical-sin(2*pi( )*cell/23) 


will draw a sine curve, representing your 
physical biorhythm, with the correct pe- 
riod. If we take the first cell of the graph to 
be today’s date, then, as it stands, the 
curve drawn by the above formula will be 
your correct physical biorhythm only if 
your age (as returned by the days( ) func- 
tion described above) is an exact multiple 
of 23 days. It would be tedious to have to 
wait for the next such coincidence every 
time you wanted to getan up-to-date chart. 
To get the right proportion of the bio- 
rhythm on the screen, we need to intro- 
duce the concept of phase. This is the 
amount by which the sine wave is shifted 
along the axis from the origin according to 
the number of days you are into your 
current cycle. To find this out we need 
what is known in the mathematics as an 
MOD function which gives the remainder 
when we carry out a division of one 
number by another. For example, 13189 
MOD 23 is 10, ie 13189/23 is 573 remain- 
der 10. 


Substitute MOD 


Unfortunately the Psion programs do 
not possess either DIV or MOD functions, 
but we can construct a substitute with the 
help of the int( ) function which returns 
the integer part of a real number. Thus 
int(13189/23), equivalent to 13189 DIV 23, 
gives theresult573. The remainder is found 
by subtracting 573 times the period 23 
from 13189: 


13189 MOD 23 
is equivalent to 


13189 - 23*int(13189 /23) 
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which gives the result 10. Now we can 
include this phase shift in our formula to 
get the correct biorhythm curve on any 
date: 


Physical=sin(2*pi( )*(cell + (13189- 
23*int(13189 /23)))/23) 


Similarly, the emotional and intellectual 
curves are given by the formulae: 


Emotional=sin(2*pi()*(cell + (13189- 
28*int(13189/28))) /28) 


and 


BIORHYTHM CURVES 


S Intellectual 


Bb 7 9 2 2 23 


July 1991 





Intellectual=sin(2*pi()*(cell + (13189- 
33*int(13189/33))) /33) 


Barchart 


If you type these formulae straight in 
after loading Easel, you will get a bar- 
chart labelled January to December which 
is both unsatisfactory to the eye and po- 
tentially misleading since Easel’s built-in 
month labels have nothing to do with the 
period to which the curves are meant to 
refer. Remember that our formulae gen- 
erate the curves for each day starting with 
today’s date. 


BIORHYTHM CURVES 


\/ Physical . Intellectual 


1 / Emotional 


eM 
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BIORHYTHMS 


To improve the 
appearance, start by 
changing some of 
Easel’s default val- 
ues before typing in 
the formulae. First, 
change the format 
from bar-chart to 
line graph by press- 
ing F3C F3 ENTER 
to C(hange) to 
F(ormat) 3 and then 
press CG 0 ENTER 
to C(hange) the 
G(raph) paper back 
to format 0 (easiest 
for viewing). Re- 
move the labels by 
pressing E L to E(dit) 
the L(abels) and 
then press F4 twelve 
times to remove 
them one by one. 
This will have the 
added effect of in- 
creasing thenumber 
of cells visible when 
F4 pressed is for the 
twelfth time. When 
Easel has finished 
redrawing the 
screen, press F4 a further eight times to get 
30 cells (days) showing. Alternatively, in 
data-entry rather than command mode, 
press TAB to move the cursor across the 
screen to get the extra cells. Press ESC to 
return to command mode to edit other 
items such as axis and graph titles or just 
press ESC again to return to data-entry 
mode. 

Now enter the formulae given above for 
the Physical, Emotional and Intellectual 
biorhythm curves. After entering each one, 
press F3 C L (number) ENTER ESC to 
C(hange) the L(ine) colour to whatever 
number you wish and return to data-entry 
mode. I find 0 for white, 1 for green, and 2 
for red are easy to distinguish. Then press 
F3 V ENTER ENTER to V(iew) all Figures 
with format 3. Enter F3 K ENTER to K(ill) 
Easel’s ready-made ‘figures’ data set. 

You can then tidy up the graph further 
by editing the text and axis-labels and re- 
positioning the key, or removing it if you 
prefer, as shown in the figure. The in- 
structions for carrying out these operations 
are described in the OL User Guide. You 
could make a screendump of the graph to 
a dot-matrix printer from within Easel by 
pressing F3 P P. You could update it 
monthly by typing the formulae again 
with your new age in days. Also, by in- 
creasing the number of cells visible on 
screen, you could get three months’ worth 
of data on one graph. 

If, before now, you’ ve experienced days 
when things seemed to go right for you 
and also the occasional ‘off’ day when 
everything ended in disaster, you may 


Al 
Format 3 Rep LINE @ 


Current Mame Physical find the answer in your daily biorhythm 


chart: it might be worth having a look! 





S90K Memory 
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Cowo Electronic have released 
version 1.11 of their front end 
for the QL and Thor, QTop. 
Features listed by Cowo in- 
cludeacompletely revised Boot 
program with simpler user 
configuration, including F5 
startup for the Amiga with the 
OL Emulator; two new Thor 
XVI Emulators for the Miracle 
Gold Card, one for pre-JS roms 
and one for JS and later roms 
including Minerva; QJump’s 


RAMPRT ramdisk replaces the 
CST Ramdrive (which is still 
included for users of standard 
128 K QLs); the latest English 
version of the QJump extended 
Pointer Environment, includ- 
ing a special version for Thor 
XVlusers, supporting the Thor 
mouse; configurable programs 
menu via Config _Bas; and but- 
ton and hotkey demo files. 
Other parts of the program 
have been updated to make 


Menus from 
Merz 


Jochen Merz has told QL 
World that his program Menu 
Extension 3 is now in produc- 
tion, withimproved file-select 
allowing display of multi- 
column files Ebare| 
subdirectories, and acomplete 


tree. A new feature, Directory- 
select, allows directories to be 
constructed exactly as found 
in Qpac 2 or the File-select 
menus, and gives direct ac- 


cess to any device, 
subdirectory and the pre-de- 
fined directories. List-selectis 
also new, replacing the old 
select-from-list and allowing 
standard arrays to be passed 
to it. 

For all OQL-Emulator users 
with an inbuiltMegaST clock, 
the bug which adds an extra 
day to the year every year has 
been corrected. You can get a 
free update by returning your 
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QL BOOT disk with two 
International Reply Coupons 
toJochen,orjust putan ADATE 
-86400 in your BOOT file. 

The flp/ram Level 2 eproms 
for the Trump Card and 
SuperQ Board now both con- 
tain the ATR device which 
allows direct access to Atari/ 
USI Mi ceyuratslacse me bt-) <cmmrets( =m) 
special demand. The new 
versions have risen in price to 
£18, but, says Merz, that is a 
more than fair price for what 
you get. Please specify Trump 
Card or SuperQ Board when 
ordering — the new eproms 
are different. 

Orders and enquiries to 
Jochen Merz Software, Im 
stillen Winkel 12, 4100 
Duisburg 11, West Germany. 
Jochen can now accept all ma- 
jor payment cards, including 
American Express. 





the most of ExeQtor and the 
Gold Card; plain text error 
messages are included; QTop- 
Desk can be started directly via 
a Button. DIRECTORY and the 
KEYBOARD menu have been 
revised and rewritten respec- 
tively; programs in MYPROGS 
can have a program path each; 
VIEW SCR in the TOOLS menu 
has a menu for action routines, 
and there are other upgrades 
of detail. 





MUS CE NE 


QTop 1.11 with additions 


The UK price for the new ver- 
sion is £29.50, disk only. 
Registered QTop users should 
contact Cowo about updates. 
Cowo Electronic, Munster- 
strasse 4, CH-6210 Sursee. Tel: 
(Switzerland) 045 211478. 





New England Group 
in 


expansion 


The New England Sinclair QL 
Users Group (NESQLUG) has 
expanded its membership to 
35, and its group software li- 
brary very considerably by 
acquisition of the German IFE 
public domain/user group 
disks. The IFE list comprises 
some 90 disks and 1230 pro- 
grams from users all over the 
world, in many languages 
(many PD programs on the IFE 
list appear in other PD libraries 
and sources). Hugh Howie 
writes about setting up a Gold 
Card across the Great Pond, 
and the prompt and accurate 
help he received from Miracle 
Systems with his queries. An- 
other reportalso points out that 
the OL’s notorious membrane 
keyboard is ideal for use in a 
pottery or other industrial 
situation — it’s not sensitive to 
dust and soot, and has no fan 
to suck dirt into the works. 


Membership of NESQLUG is 
$US10, students $US5, overseas 
(air mail) members $US15. 
Contact the treasurer and 
membership secretary, Sherm 
Waterman, 40 Eileen Street, 
Yarmouth Port, MA 02675, 
USA. 


Euro Fair 


Following a1991 with no 
European Microfair at the 
Eurovolleycentre, Brussels, 
‘owing, to circumstances’, 
QL club BruQsL are now 
planning the European 
Microfair 1992. Registration 
for firms and clubs is now 
open. For more information, 
please write, phone or fax 
Jaques Tasset, Aarlenstraat 
104, B-1040, Brussels, Bel- 
gium. Tel. (local) 02/2331222, 
fax 02/2331220 
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‘We are at presenthaving —— 

difficulties in exporting copies 
of Sinclair QL World. So that yo 
do not miss any copies, we 
invite you to take gb das 
of the following offer: . 





\\ 


That's 3 issues Free!! 











Please send me my 12/24 month subscription to Sinclair QL World. at the special discount rate of 

3 | will receive 3 free issues before my subscription becomes due for renewal. | 

| enclose my cheque/money order for £ made payable to MCPC Ltd or debit my Access/ Visa | 
card. No. Expiry date 

Name 
Address 








(Please enter postcode to ensure prompt delivery) 
Signed. Date. QL 0392 


EUROPE £32.90 12 mths REST OF £40.90 12 mths 
£61.80 24 mths WORLD £77.80 24 mths 


Overseas rates include Airmail service 






















To place an order by phone 
please have your credit card 
ready. For overseas customers 
we charge the prices shown in 


MIRACLE 


mies 
WINS itet\ Db) pe | VISA 
LX . ce 









QL GOLD CARD 


£375 inclusive (£330 export) 


¢ 2 year warranty ¢ 14 day money back guarantee « 


The GOLD CARD is the ultimate 
expansion for the QL. It speeds up program 
execution by a factor of about four, 
increases the memory to 1920K bytes and 
enables the QL to interface to 3.2M Byte 
disk drives (as well as 720K and 1.44M). 


There is a battery backed clock so that the 
QL powers up with the correct time and 
date. 


We offer part-exchange for old expansions: 









Part Ex. Item GOLD CARD price 















£350.00 


TRUMP CARD 2 £225.00 (£200.00 export) 

TRUMP CARD 768K £275.00 (£241.00 export) 

TRUMP CARD 256K = £300.00 ~—_ (£263.00 export) 

EXPANDERAM £325.00 (£284.00 export) 

DISK CARD £325.00 (£284.00 export) 

RAM+DISKIV/FACE £325.00 (£284.00 export) 
( 





Other Expansion 





£305.00 export) 





Please send me 


| Or debit credit card 


brackets. | 


To order by post, please fill in 
the form opposite or write to us 
quoting your credit card 


Address 


number and expiry date, or 


| 
| 
| 
| 
enclosing a cheque payable to & 
MIRACLE SYSTEMS Ltd. 








| | enclose a cheque to the value of: 3 


ae | | |, a 
expires [ i—yi —| 


¢ All the functions on the TRUMP CARD, i.e. 
TKIl, printer buffer, screen dump, RAM disk 
and memory cut, are carried over to the 
GOLD CARD. 


¢ The floppy and RAM disk drivers now 
support sub-directories. 


JOIN QUANTA ! 


QUANTA is the independent QL user's club. If you have not 
already joined then consider the following: 


QUANTA stands for “QL Users and Tinkerers Association” 
and provides a forum for users to get together. 


Members requiring guidance on software and hardware can 
seek out expertise from fellow members. 


Local sub-group meetings are regularly held throughout 


much of Britain. 

There are also workshops where we and others demon- 
Strate our wares. Members have access to a large software 
library and can often find spare parts and second hand 
bargains at QUANTA meetings and can see new products. 


The £14 (£17 overseas) subscription includes an informative 
monthly magazine. Most of all, though, it is good fun so contact 
the Membership Secretary, Bill Newell, 213 Manor Road, 
Benfleet, Essex, SS7 4JD, or telephone (0268) 754407 now! 


| | To: MIRACLE SYSTEMS Ltd, 25 Broughton Way, Osbaldwick, | 
Tel: (0904) 423986 | York, YO1 3BG, U.K. Tel: (0904) 423686” 


Signature 





MIRACLE 
SYSTE 








EXPANDERAM 
312K 


£50 inclusive (£46 export) 
1 year warranty 





This simple expansion offers a great 
improvement to users of unexpanded QLs. It 
increases the QL RAM from 128K to 640K. The 
effect of this on Quill, for example, is threefold: 


« Much larger documents can be created 
- A useful increase in the speed of operation 
- The need for def_temp files is removed 


Also the QL expansion connector Is replicated 
so that a disc interface can still be connected. 
n.b. The EXPANDERAM cannot be used with the 
TRUMP CARD or GOLD CARD 


3,2 MBYTE 
DUAL DRIVE 


If you currently have an order with us or are 
considering ordering the 3.2 M byte DUAL DISK 
DRIVE then please note that we are 
experiencing difficulty in obtaining the 
mechanisms at a Suitable price. This has led to 
long delays in delivery of this product. We 
sincerely hope that you will agree with us that 
we should not pay over the odds for goods 
imported from Japan and that you will bear with 
us until the negotiations can be resolved. 
Please also note that when used with the 
TRUMP CARD diskettes will only give 
capacities of up to 720K bytes. 
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QL CENTRONICS 


£29 Inclusive (£28 export) 


The QL CENTRONICS PRINTER INTERFACE 
enables a printer with a standard Centronics 
parallel port to be connected to the QL with 
great ease. the Interface plugs into the 
Centronics port on the printer and has a 3 metre 
cable terminated by a QL serial plug. The serial 
plug can be plugged Into either SER1 or SER2. 
Nothing else is required. 


We are exhibiting in: 


GLASGOW: 


8th March 1992 
City Hall 
Candleriggs 


LONDON: 


14th March 1992 
Royal Horticultural Hall 
Greycoat Street, 
Victoria 


GERMANY: 


21st March 1992 
Munster 


MIRACLE SYSTEMS Ltd, 25 Broughton Way, Osbaldwick, 
York, YO1 3BG, U.K. Tel: (0904) 423986 





INFORMATION 
Program: PCB_CAD 2.01 


Supplier: Lear Data Systems 
Price: £69.95 





CB_CADisaprogramspecifically 
designed to create two- 
dimensional drawings for use in 
themaking of printed circuit boards. 

It can also be used as a general purpose 
drafting package, and I have used this facil- 


ity to prepare the component layout draw-. 


ings for most of the pcbs I have designed 
and made. 

On receipt, the disk contains eighteen 
files. One of these is the instruction manual, 
in the form of a Quill document file. This is 
logically formatted, ranging from the con- 
tents page at the front, to two appendix 
sections at the end, and is easy to follow. It 
contains all the information necessary to 
operate the program successfully. Addi- 
tionally, the appendix contains a list of all 
the components available in the on-line 
library file, as well as details of the art file 
data format. The art file is the file that you 
create and, when saved to disk, it is auto- 
matically given the extension _art. The size 
of this file can be displayed at any time. 

The instruction manual rightly advises 
that, as this file contains your precious art 
work, you should keep backing it up at 
regular intervals as you proceed. The other 
files on the disk are the Boot and Backup 
programs, a configuration program, vari- 
ous printer drivers including Shinwa CPT- 
80, Panasonic KX-P1124, Canon PW1080A 
and PW-1156A and the Epson LX-800, a 
public domain PostScript conversion pro- 
gram supplied free of charge, along witha 
toolkit extensions program required for the 
correct operation of the suite. In addition, I 
understand that later versions of the pro- 
gram also contain conversion programs for 
Gerber and Wanatabe formats. The on-line 
library and Help files, and finally a couple 
of demonstration _art files in the form of a 
pcb design and a circuit diagram complete 
the list. 

Artwork is created by manipulating the 
elements of the drawing - tracks, pads, 
blocks or text — using the cursor keys or, as 
in my case, a Mouse. As one of the 16 
overlaid layers can be worked on at any 
time, each layer is allocated a different col- 
our —seven of these being active at any one 


The pcb diagrams are printed here slightly 


larger than life-size. PCB_CAD originates 
them to full technical tolerances. 
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Ray Dawson has been using Lear Data Systems’ 
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time. The colour of each layer may be al- 
tered using the Mask command and, as the 
background colour is black, any layer may 
be hidden from view by changing it to 
black. However, when this is done, it disa- 
bles the Find command. This command 
enables any element to be ‘picked up’ and 
edited. As this is done, the element changes 
colour to white and cyan, defining the start 
and finish, or head and tail of the element. 


Library elements 


If the element happens to be a library 
item, its library identity number can also be 
established at this stage using the Identity 
command. Until I acquired a colour moni- 
tor, I found the program very difficult to 
use when trying to identify more than one 
overlaid layer, or the colour change when 
editing. This is one of the very few criti- 
cisms I can level at a very professional 
program, but I must emphasise that a col- 
our monitor is essential if you are contem- 
plating any really serious multi-layer work. 
As an area at the bottom of the screen is 
already used to display such things as the 
current cursor co-ordinates and the grid 
step setting, I feel thatit would be helpful to 
see the current active layer number dis- 
played as well, to assist users with mono- 
chrome monitors. 


package to create printed circuit board designs. 


Figure one: a 
pcb layout as 
produced on 
PCB_CAD 
(track side). 


Completed or unfinished art work can be 
stored on disk for later processing, using the 
Save and Load options, while the library file 
provides a source of the more commonly 
used elements, such as dual inline IC bases. 
This file can be extended to contain up to a 
maximum of32000items. The latest version of 
the program, I am told, has simplified this 
considerably. In version 2.01 itis necessary to 
exitthe program in order toadd to the library, 
but I understand that later versions permit 
additions to be made without re-booting. 

Outputcan beeitheras HP-GL (plotter) files 
for disk storage or serial output, or as a 
PostScript file for output to a laser printer. In 
addition, as previously mentioned, later ver- 
sions of the program contain conversion pro- 
grams to Gerber and Wanatabe formatso that 
all possible graphics reproduction devices are 
now catered for. 

With tongue somewhat in cheek, I have to 
admit that I have not yet fully explored the 
whole drawing area of 32 by 32 inches, or the 
claimed resolution of 0.001 inch, but I can 
verify that the resolution is well within the 
limits needed to produce very acceptable 
quality boards, even when using the latest 
surface-mount technology. 

The hardware requirements are either a QL 
or Thor with a minimum 512K expansion 
memory, a monochrome or colour monitor 
(bearing in mind my previous comments), 
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and an Epson compatible dot-matrix printer, 
flatbed plotter, photoplotter or laser printer. 
Iuse a Brother M1009 printer, and have got 
perfectly acceptable results using the Epson 
LX-800 printer driver supplied, and the 
methods explained later. 


Manual advice 


The manual advises that ‘the best way to 
learnis to sit down in front of the screen and 
try out the commands’. This is very good 
advice indeed, and it is by this method that 
I have become acceptably proficient in its 
use. At any time the Fl key will always 
display the list of commands available at 
that point in the program, and I have found 
this on-line help invaluable. At switch-on it 
is immediately evident that, although the 
program is not copy protected, some at- 
tempt has been made to personalise your 
copy by the inclusion of your name at the 
top of the start-up screen—a nice touch, and 
one which engenders a sense of ownership 
while at the same time ensuring that the 
copy is unique to the purchaser. 

Initially, the Normal Edit Mode is in op- 
eration, displaying a cursor in the form of a 
cross. The x,y co-ordinates of this are dis- 
played at the bottom of the screen —at 0,0 to 
start with — and these are dynamically up- 
dated as the cursor is moved about the 
screen, the distance moved with each key 
press depending on the selected Grid incre- 
ment setting. At any time, the cursor may 
be positioned centrally on the screen by use 
of the space bar, or the current cursor po- 
sition redefined as the 0,0 co-ordinates by 
invoking the Relocate command. The Grid 
increment setting is adjustable in eight pre- 
programmed steps, ranging from one 
thousandth of an inch to one inch, the inter- 
mediate steps being at 5,10, 20, 25, 100 and 
200 thou. A grid marker in the form of a trail 
of blue dots may be toggled on and off with 
the F3 key at any time. 


Tracks and pads 


Tracks, pads, blocks and text can be ma- 
nipulated in size and, in the case of the 
pads, shape as well—either square or round 
—can be selected. The sizes range from 50 
thou. to 260 thou. in sixteen intermediate 
steps. The inclusion of a ‘bomb-sight’ board 
maker, in the form of a cross within a 200 
thou. diameter circle, completes the pad 
library. Remember that each element has 
start and finish positions designated as the 
head and tail. During editing, these desig- 
nations may be exchanged, or the cursor 
moved from one end to the other by the use 
of a single key stroke, removing the need 
for a lot of cursor manipulation. The Kill 
command removes the element completely, 
while Delete removes just that part of the 
element to which the cursor is currently 
attached, leaving the rest unchanged. 
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SOFTWARE FILE 


Figure two: How PCB_CAD lays out components for use on the board. 


Track thicknesses can be from varied, in 5 
thou. increments from a minimum of 5 
thou. up to 315 thou. These are designated 
Track 1 to Track 63. In addition there is a 
Track 0 with a width of 2 thou., and I found 
this especially useful in the preparation of 
circuit diagrams and general drawings. 

Blocks are areas of the board defined by 
the use of the cursor keys after selecting the 
Block edit mode. These areas represent solid 
blocks of copper on the finished board, and 
are invaluable for drawing earth-planes 
around other circuit areas. 

Text is also fully programmable in size 
and shape and is a very attractive 
‘draughtsman’-style typeface. Nearly all 
operations are performed by a single key 
stroke (sometimes with the addition of the 
Ctrl key) and this makes a very user friendly 
environment. The initial letter of its name is 
usually sufficient to execute the desired 
command, but you will have to get your 
own copy of the program to find out how 
conflicting words like Library and Layer 
have been dealt with. 

If library components are to be edited, 
there is a Library Unlock command to en- 
able this to be done, otherwise a library 
item, even though it is individual elements 
may be physically separate, will behave as 
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a unit. In addition to editing individual 
elements, Global edits may also be per- 
formed, manipulating whole areas. Because 
this isa very powerful command, an Undo 
command has been included though care is 
still needed — so be warned. It is worthy of 
note at this point that track widths and also 
pad sizes may be globally changed, but care 
is needed here, as some changes may be 
irreversable by global means, and may leave 
you having to do individual element edits 
to achieve the desired result. Facilities to 
copy (or duplicate) areas are especially use- 
ful when preparing drawings of memory 
planes or similar repetitive designs. 


Rubber-banding 


In the Element edit mode components 
brought from the library, or individually 
created, may have their terminals inter- 
connected using tracks rubber-banded from 
point to point. I have found that it is best to 
use right-angled tracks wherever possible, 
as the use of the sloping tracks does tend to 
produce jagged lines on my dot-matrix 
printer. However, if you possess a plotter or 
other more advanced means of reproduc- 
tion, then no such restriction need apply. 

Individual elements can be modified, if 


nes 


RESET 





Figure three: One side of a double-sided pcb from the sample file. 
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SOFTWARE FILE 


desired, or the element moved around the 
drawing area as an entity. Alternatively, a 
whole area can be selected for modification 
or positioning, by entering the Area for- 
matting mode. Rotation of the whole, or 
part, can be made clockwise or anti-clock- 
wise, or on either X or Y axis. The axis or 
origin of the rotation depends on the cur- 
sor position when the command is ex- 
ecuted. 

In preparing a drawing I have found it 
best to design the whole layout on graph 
paper first. If a graticule spacing of one 
tenth of an inch is used, it is then very easy 
to translate this to the screen, with a grid 
setting of 100, as nearly all electronic com- 
ponents can be made to fit on a one-tenth 
inch matrix. Have the components to hand 
and measure them as you go. When the 
design is complete, sit down and carefully 
transfer it to the screen. On completion, do 
a draft print. Look carefully at the joints 
between tracks and pads. By experience I 
have found that it is best to use the highest 
possible scale magnification when joining 
tracks to pads, to ensure that they connect, 
but do not extend into the centre region of 
the pad. 


Scale factors 


Scale factors are controlled by the nu- 
meric keys 1 to 8 for the selection of a 
particular magnification. Alternatively, the 
plus and minus keys allow single-step 
magnification changes up or down. Should 
the track extend too far into the pad it will 
print as a solid block. Leaving a trace of 
white in the centre of the pad helps to locate 
the drill whenit comes to drilling the etched 
board later in the process. 

By way of example, Dr. Paul Stewart 
G7EAH recently published a design for an 
audio notch filter. Amongst others, I have 
produced a printed circuit board based on 
this design, using PCB_CAD, and copies of 
the board have been used successfully by 
members of our local amateur radio soci- 
ety in Stockport. The full size print of the 
board design is shown in figure one. 
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To make the printed circuit board, the 
art-work was first printed using the mirror 
image, that is, first rotated through either 
the X or Y axis and printed using a times 
two scale factor selected from the printer- 
driver options screen. Various parameters 
are available for the choice of output. By 
selecting a magnification of two and alsoa 
graphics density of two, the printer pro- 
duces an image with each line double 
printed, which, with a fairly new ribbon, 
produces a reasonably dense image. 

I have found that two passes is the opti- 
mum. Increasing this only introduces 
smudging, and a single pass is a bit too grey 
to get the required contrast. Always use a 
good quality copying paper of about 80gm/ 
m/? with a matt finish, as this tends to absorb 
the ink without bleeding. When duplicated 
on a copying machine at the local office 
supplies shop on to acetate film at a 50% 
reduction, this produces a positive image 
when viewed through the film. This not only 
produces a very accurately dimensioned im- 
age, but also has the effect of doubling the 
density and so far has proved highly success- 
ful on every board I have made. Incidentally, 
the idea of duplicating the mirror image is to 
get the ink on to the side of the acetate which 
is going to be in contact with the photo- 
sensitised surface of the printed circuit board, 
when it is exposed in the UV light box. This 
avoids any possibility of the light rays dif- 
fusing when they pass through the acetate 
before reaching the board — think about it, 
and you'll see what I mean. This program, 
when used in any of the normally accepted 
ways, is capable of producing pcbs which are 
notonly dimensionally correct butofthe very 
highest quality. Figure twoillustrates the way 
the program was used to help in the placing 
ofcomponentsonthe finished pcb. PCB_CAD 
does not do automatic routing, neither does 
any other program I have seen at the price, 
but provided one is able and willing todo the 
basic work, it is in the highest traditions of 
programming. Muchthoughtand effort has 
gone into its design with the user in mind. 


The demonstration designs included on 
the program disk speak for themselves. In 
the interests of space these illustrations 
have been somewhat reduced in size. Fig- 
ure three shows just one side of a double- 
sided board design from the Example_art 
filesupplied with the program. Figure four 
shows thecomponent layout for this design. 
The whole file consists of four overlaid 
layers. Layer 4 has been used for the top 
side of the board with all it is interconnec- 
tions and necessary text; Layer 2 has been 
used for the component layout diagram; 
Layer 1 contains the bottom side connec- 
tions, while Layer 5 has been used for all 
pads and IC connections, and is printed in 
combination with Layer 4 and Layer 1 to 
produce the completed designs for the top 
and bottom sides respectively. 


Dodge duplication 


As the pads and IC connections on Layer 
5 are common to both sides of the board, a 
lot of unnecessary duplication has been 
avoided by using this method. These lay- 
ers have to be printed out carefully, either 
independently or in combination, and ei- 
ther ‘as seen’ or in mirror image in order to 
achieve the desired end result. This is one 
of the main strengths of the program and 
enables absolute registration to be main- 
tained between layers at all times including 
‘vias’ from one layer to another. It will be 
seen that the sloping tracks have not repro- 
duced very well with my printer, but with 
a board of this complexity a trip to the local 
reprography shop or agency would be 
worthwhile for them to produce the fin- 
ished art-work using your HP-GL (or other) 
file on more sophisticated equipment. 

I feel that with this program, Lear Data 
Systems have established themselves as a 
major contributor to the QL software scene 
and are to be congratulated on their 
achievement. Not only does the program 
perform magnificently, but the price is also 
very realistic considering its complexity. 


Figure four: 
The 
components 
laid out for 
the sample 
board. 
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DATASPACE (file$) 


[TURBO TOOLKIT] 


DATA AREA kbytes 


DATE 
DATES (number) 
DAY$ (number) 


[Superbasic] 
DATE (yr,mon,day, hr,min,sec) 


[Minerva] 









SECTION 


RI 


USER GUIDE 
KEYWORD INDEX 


This month in the Keyword Index, Mike Lloyd moves 
from DATASPACE to DEVICE_STATUS. Not 
photogenic, but fascinating. 


MEMORY FUNCTION 
file$ a valid file name 
kbytes an integer constant (not a variable) 


When a SuperBasic program is compiled with Supercharge or Turbo, a set amount of memory is 
allocated for its personal data. The amount of dataspace can be adjusted from the compiler’s control 
panel and should be made sufficient to hold all variables, arrays and scratch space without wasting 
any memory. Alternatively, the compiled task can containa DATA_AREA command which changes 
the control panel setting. The DATA_AREA parameter represents whole numbers of kilobytes, so 
DATA_AREA 6 will allocate 6K of memory. 

The DATASPACE function returns the number of bytes of memory a task is currently allocated. It 
returns standard error codes if the filename it uses is not found. Suppose a compiled program which 
needs 4K for its own variables is about to be loaded to handle a large, user-defined, numeric array. 
DATASPACE can be used to warn of insufficient dataspace in the following manner: 


100 DEFine FuNction check dataspace (rows, columns, program$) 
110 LOCal array_bytes 

120 array_bytes = rows * columns * 7 + columns * 2 

130 IF array_bytes + 4000 > DATASPACE (program$) 

140 PRINT “Array is too large for dataspace” 

150 RETurn 0: REMark “false” 

160 ELSE 

170 RETurn 1: REMark “true” 

180 ENDIF 

190 END DEFine 


INTERNAL CLOCK FUNCTIONS 
number a large, whole number 
yr an integer year (eg 1961) 
mon an integer month in the range 1-12 
day an integer day in the range 1-31 
hr an integer hour in the range 0-23 
min an integer minute in the range 0-59 
Sec an integer second in the range 0-59 


For a computer unable to remember which day of the week it is from one working session to the next, 
the QL has quite a powerful set of time-related commands. The basic premise is that the QL’s clock 
is counting the seconds between 1 January 1961 and 27 February 2097. This is fine for the average 
business application, but can be restrictive for historical and astronomical applications. Because 
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DDOWN dirname 


[Super Toolkit II] 


DEALLOCATE basebyte 


[Turbo Toolkit] 


DEFAULT DEVICE 


drive 
[Turbo Toolkit] 


DEFine FuNction 
fname (param1, param2, ...) 


DEFine PROCedure 


pname (param, param2, ...) 
[User-Defined Keywords] 


numbers such as 9632736 are not immediately recognisable as ‘7 July 1992’ SuperBasic includes a 
number of functions which translate between the internal representation of time and more normal 
conventions. 

In SuperBasic, DATE is a function without parameters (although it may optionally take brackets to 
please the purists) which returns the QL’s date in its internal, numeric representation, so that PRINT 
DATE might return 9.632736E8. QView, who developed Minerva, have added an additional facility so 
that DATE can take six parameters representing year, month, date, hour, minutes and seconds 
respectively, converting a known date and time into the QL’s internal value. 

To see the same date in a more understandable format the DATE$ function can be used. DATE$ 
will convert a numeric parameter into a date and time string such as ‘1961 Jan 01 09:00:05’. If no 
parameter is provided, the QL’s internal date/time counter is converted into a string. 

Programmers sometimes attempt, incorrectly, to slice the date/time string, forgetting that DATE$ is 
a function which expects a numeric parameter and is therefore thoroughly confused by instructions 
such as PRINT DATE$(6 TO 8). To extract a part of the string it must first be assigned to a variable. 
The following function shows how the month can be extracted from a date. The function takes a 
numeric parameter and returns a string. 


100 DEFine FuNction GetMonth$ (dateval) 
110 LOCal datetext$ 

120 datetext$ = DATE$ (dateval) 

130 RETurn datetext$ (6 TO 8) 

140 END DEFine 


SuperBasic helps with the day of the week, which would otherwise be difficult to calculate, by 
providing a DAY$ function. DAY$ returns the day of the week represented by the QL’s internal clock 
setting (if no parameter is given) or the day represented by a numeric parameter 


Directory Navigation 
dirname a valid filename extension 
Super Toolkit Il implements a multiple-level directory system which was dormant in the original 
release of Qdos. DDOWN is a command to move ‘down’ a subdirectory by appending dirname to an 
existing directory default. It only affects the prefix set by DATA_USE unless PROG_USE has been 
set to exactly the same prefix, thus ‘binding’ both the program and data directory pointers. The 
following commands and their associated remarks should clarify DDOWN’s effect: 


100 DEST_USE scr: DATA_USE flp 1_ 

110 COPY filename: REMark flp1_ filename copied to screen 
120 DDOWN work 

130 COPY draft: REMark flp1_work_draft copied to screen 


Memory Command 

basebyte A valid, even memory address 

Areas of the QL’s common heap of unallocated memory can be reserved with functions such as 
RESPR which return the address of the first byte of memory to be reserved. Hold on to this value, 
because without it memory cannotbe deallocated. Turbo Toolkit includes the command DEALLOCATE, 
which must be followed by the address of the first byte, to return a reserved memory area back to the 
common heap. Avoid memory fragmentation, where allocated and free chunks of memory are 
interspersed with each other, by releasing memory in the opposite order in which it was allocated. 


Device Command 
rive A drive prefix with final underscore 
Turbo Toolkit does not acknowledge the Qdos directory hierarchy but instead allows programmers 
to declare a default device. This means that acommand such as OPEN filename can be issued without 
error, provided that a command such as DEFAULT_DEVICE flp1_ has been issued earlier. 


fname/pname A unique, non-reserved work 
param (optional) Parameter names 

When SuperBasic was first introduced the DEFine FuNction and DEFine PROCedure constructs 
justified to a large degree the ‘Super’ prefix. Most of SuperBasic’s predecessors, and even some of 
its successors, did not permit users to extend the language in any meaningful way. Where other Basic 
dialects, such as BBC Basic, allowed procedures to be defined they were not as complete as 
SuperBasic. 

A user-defined procedure or function can do anything which can be defined in terms of existing 
SuperBasic keywords. Once defined, it can be used by other user-defined structures. If a program has 
a need for text to be centred in a window, SuperBasic has no command of its own to perform the task, 
but it does allow programmers to develop one: 
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DEG(radians) 


[SuperBasic] 


@ DELETE filename 


[SuperBasic] 


100 DEFine PROCedure CPRINT (text$, windowwidth) 

110 REMark windowwidth gives window width in characters 
130 IF LEN(text$) >= windowwidth 

140 PRINT text$ 

150’ ELSE 

180 PRINT TO (windowwidth-LEN(text$))/2; text$ 

190 ENDIF 

200 END DEFine 


Functions differ from procedures in that they return a value of some sort and that their names must 
agree with the type of value returned: the name of a function which returns a string must end ina $. 

SuperBasic does not include a function which returns the sign of a value, but a user-defined function 
can be written which does so: 


200 DEFine FuNction SIGNUM (value) 
210 IF value > 0: RETurn 1 

220 IF value < 0: RETurn -1 

230 RETurn 0 

240 END DEFine 


Functions and procedures in SuperBasic are fully recursive in that they can call themselves either 
directly or via a subordinate procedure or function. Although clever and concise code can often be 
written in this way it is usually preferable to avoid recursion because of the overheads it imposes on 
the interpreter and the ease with which undesired results can be obtained. However, to show an easy 
recursive solution to a problem, here is a procedure to print out each word of along string on aseparate 
line: 


300 DEFine PROCedure Wordlist (text$) 
310 split = “” INSTR text$ 

320 IF split = 0 

330 PRINT text$ 

340 RETURN 

350 ELSE 

360 PRINT text$ (1 TO split) 

370 Wordlist text$ (split+1 TO) 

380 ENDIF 

390 END DEFine 


The basic structure for a user-defined procedure or function is an opening line declaring the name 
of the structure and any parameters it may have. Definitions do not need to have parameters if they 
are not wanted. Parameter lists are separated by commas. Note that both procedures and functions 
require brackets when the definition is called. There then follows a body of lines which define the 
actions carried out by the user-defined structure. The final line is END DEFine. SuperBasic allows the 
body of a procedure or function to contain another user-defined segment, but it would be loose 
programming practice to take advantage of it. Similarly, SuperBasic does not object if a GOTO or 
GOSUB within a definition jumps to some code outside the definition boundaries, but it would be an 
incautious programmer who thought that this was a worthwhile activity. 

An unusual feature of user-defined parameters is that their names do not have to conform to the 
normal SuperBasic naming rules. Thus, although the above example uses text$ for its parameter, text 
would have done equally well. Unless a parameter can represent either a string or anumber it is best 
to stick to the normal naming conventions. 

The name given to a definition becomes in effect a new SuperBasic keyword, and can be used as 
such, as shown in the following examples: 


500 CPRINT “hello world”, 32 
550 X = Y * SIGNUM(Z) 
600 PRINT userfunction (15, 20) 


Trigonometry Function 
radians A numeric value 
In line with most computers, the QLis happier dealing with radians than with degrees. However, people 
are usually more familiar with degrees and so conversions between the two are part of the QL’s 
trigonometry suite. DEG converts an angle expressed in radians into its equivalent in degrees. 
The ratio between the radius of a circle and its circumference is slightly more than 6:1. In other words, 
six and a bit lines each the length of a radius would be needed to cover a circle’s circumference. This 
ratio is better expressed as 2 “pi. It should be obvious that DEG (pi) will return 180 and DEG(2 * pi) 
will produce 360. 


FILE COMMAND 
filename A valid filename 


27 
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DEL_DEFB 


[Superb Toolkit Il] 


DESTD$ 
DEST USE device 


[Super Tookit II] 


DEVICE_SPACE chan) 
chan 


[Turbo Toolkit] 


DEVICE STATUS 


(type, file) 
[Turbo Toolkit] 


DELETE is a straightforward command used to remove a file from a directory. Provided that it is 
followed by a technically valid filename it will issue no warnings or error messages, even if the file does 
not exist. QL users usually find out to their regret that computers have absolutely no idea about the 
value of a file, and will blindly delete a large, unique and essential file with as little fuss as a small, 
inconsequential one. 

Fortunately, the DELETE keyword only affects the reference to the file in the disk or microdrive 
directory, which allows a file repair utility to recover a deleted file provided that its contents have not 
been overwritten by subsequent saves. A couple of years ago a drug dealer was successfully 
prosecuted and imprisoned because he believed that DELETE removed all evidence of his database: 
the police recreated the directory as it was before the delete was carried out and recovered all the 
incriminating information from the computer. 


MEMORY MANAGEMENT 
DEL_DEFB takes no parameters. It provides an effective cure for a form of common heap 
fragmentation. The QL copies directory contents into the common heap area of its memory in order 
to reduce the access time to reach files. Unfortunately, this habit mixed with user-sponsored memory 
allocations can fragment the memory so that large chunks of it become temporarily unusable. 
DEL_DEFB removes all file definition blocks from the common heap. It should not be used when 
channels are opened to any disk or microdrive. 


DEVICE MANAGEMENT FUNCTION 
device A valid Qdos device or file name 
The DESTD$ function reports which device or directory is currently the default destination device. 
In most cases, the default will be the screen, but it can be changed to the printer, network or a file. The 
destination device is set with the DEST USE command. 


DEVICE MANAGEMENT FUNCTION 
An open channel (leading # is optional) 

Before sending data to a file it is convenient to note beforehand whether there is likely to be enough 
space available to hold it. The size to which a file can grow is determined by the room left on the device 
which holds it. DEVICE_SPACE assumes that you have opened a channel to a file on a disk or 
microdrive. It returns the number of bytes left on that device. If the channel refers to a non-storage 
device such as the network, the screen or the printer DEVICE_STATUS returns a very large number. 
See DEVICE_STATUS below for a more useful method of obtaining this information. 


DEVICE MANAGEMENT FUNCTION 

type (optional) an integer representing access type 
file a valid filename 

A major limitation to SuperBasic is its lack of error-recovery facilities. All of the QL roms had 
incomplete WHEN ERROR code which was subsequently completed by Super Toolkit Il and by the 
Minerva roms. However, Digital Precision’s compilers needed to have version-independent error- 
trapping code. Most recoverable errors relate to file access, and so the DEVICE_STATUS function 
was created. You can provide the filename and, optionally, the sort of access you require to the 
function and its code will test the device to determine if your intentions can be fulfilled. Any positive 
return value indicates that you can go ahead, and incidentally reveals the amount of available space 
on the device. A negative return value can be interpreted as a standard error code. 


The access codes are as follows: 


0 OPEN 

1 OPEN_IN 

2 OPEN_NEW 

-1 OPEN or OPEN_NEW 


The possible error values returned by DEVICE_STATUS are: 


-3 Insufficient memory 

-6 Insufficient memory 

-7 No such device or file 

-9 Device busy 

-11 Device full 

-12 Device is valid, but the filename is illegal 
-16 The infamous ‘bad or changed medium' 
-20 Device is write-protected or being read 
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DATA SYSTEMS 


A FAST AND EASY TO USE PCB DESIGN SYSTEM 
FOR THE QL AND THOR 


DESIGN FEATURES INCLUDE: 


. A32 by 32 inch drawing area. 

. Resolution down to .001 of an inch. 

. Up to 16 separate layers with variable colour assignments. 

. 16 predefined Pad shapes and sizes. 

. 64 Track widths from .005-to .32 of an inch. 

. The number of components on a layout is limited by memory only. 
. Auto repeat on all elements ~ ideal for memory planes. 

. Can be used for surface mounted devices. 

. Auto via system for multilayer boards. 

. Over 32000 user definable library components. 

. Can output plot files to any valid QL/THOR device. 

. Produces Dot matrix, HP-GL or laser files. 

. Supports Trump card and ABC Electronik keyboard interface. 


Minimum system 
requirements: 
512K expansion and 
1 disc drive. 


Soon Oa Gh — 


Please make cheques payable to Lear Data Systems and send to: 


6 SOUTH VIEW GREEN, BENTLEY, 
IPSWICH, SUFFOLK IP9 2DR. 
TELEPHONE: (0473) 310804 


QUBBESoft P/D 
- en 


Public Domain and Shareware Software 
Copying 


For The Copying 
Fee Sinclair Q.L. 3p 
S.A.E. (A5) for Software Catalogue 
C68 Public Domain ‘C’ Compiler 


Consists of 83.5in Disks, containing the following: 
Diskl: Main System Disk- _ Disks 4-8: Source 1 to 5- 
Contains the various contains Source Code for 

: C68 Compiler, CC, CPP 
passes of the Compiler. 2 Puen SM , 
Disk2:Utilities-Contains bear tala oh 
all Utilities associated with ten am Library, 
S st a QDOS Specific part of 'C' 
C68. ; Library, Additional Librar- 
Disk3: Documentation jes & Utilities such as 
_All in Quill'_doc' format. MAKE & SLB. 




























MicroEMACS V3.9p Text Editor 


Consists of 2 3.5in Disks, containing the following: 
Disk]: Main Program guide in _doc form. 
Disk - Contains EMACS Disk2: Source Code - 
Main prog EMACS_RC_ Contains all relevant 
Resource file, Source Code for Micro- 
EMAC5_HLP Help file, EMAC5 V3.9p. 

EMACS MSS Userguide, Alsoincludesdocument 
EMACS_TUT Tutorial. onthe latest update, and 
EMAC51_doc to howithasbeenre-com- 
EMACSF_doc user piled using C68. 












































Copying fee: £2.50p (User Supplies Disks) or 
£5.00p (Pre-Copied Disks) 


Copying fee: £1.00p (User Supplies Disks) or 
£2.00p (Pre-Copied Disks) 


Disk SPECIAL 3 & SPECIAL 4 
SPECIAL 3: XLisp V1.4a SPECIAL 4: OPACer (QPAC2 Boot Creator) 


TPD program has been ported from the IBM PC with only —‘ This program has been written to help those who have 
small changes necessary to recompile it forthe QLusingC68 —_ trouble in creating their own Boot programs to run QPAC2. 
'C' Compiler. QPACer asks plain and simple questions, it will then write 
This program is restricted to Non-Commercial use (see —_a Boot program to set up QPAC2 just how you specified it. 
XLISP_MEM 1.0 INTRODUCTION) There is an extensive Manual in Quill _dock, Perfection 
An Expanded QL with TK2 and at least one Disk Drive is _ per and ASCII -txt format. 

required to run the program. Requirements are QL, 256K, QPAC2 & TK2. 

All Source Code is included on the Disk. Copying Fee: 


£0.50p-User Supplies Disk £1.00p-Pre-Copied Disk £0.50p-User Supplies Disk £1.00p-Pre-Copied Disk. 



































2nd User H/ware & S/ware 


2nd User Hardware and Software is available 
from time to time. Please ring for details of the 
current stock being held. Items available in- 
clude as follows:- 


Public Domain Authors 
QUBBESoft P/D are always seeking Authors of any 
type of Public Domain Software for the Q.L. If you 


have written a program for the Q.L. then why not 
send it in for evaluation. 


Payment 
Cheques/Postal Orders payable to :- 'K. Dunnett’ 


Postage & Packin 


(68-50p (UK) £1.50 (EUROPE) £2.50 (REST OF WORLD) 
EMACS, SPEC3, SPEC4-30p (UK) 70p (EUROPE) 
£1.50 (REST WORLD) 












QL's (Full & Backup), Disk I/Face's, Memory 
Expansion, Disk Drive's, Printer's, Monitor's 
(Colour & Green Screen), QL Related Books, 
QL User/World Back Issues, QUANTA Back 
Issues, Blank Disks's and all sorts of Commer- 
cial Software including Games and Utilities. 







38, Brunwin Road, Rayne, Braintree, Essex. CM7 5BU. 
Tel No. (0376) 47852 
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EEC LTD THE WORLD'S LARGEST QL RETAILER 


The expandable system for businesses, beginners and experts. 


COMPLETE QL’s -JS ROM - TESTED PRIOR TO DELIVERY - 6 MONTHS 
GUARANTEE 

Package includes PSU, TV Lead, OL Software 2.35: Quill -Wordprocessor, 
Abacus - Spreadsheet Archive - Database & Easel - Business Graphics, N) 
Comprehensive instruction manual. 

One year's free membership to QUANTA - the independent user group who 6) 
provide help, newsletters & a library of 400+ programs - mostly free. 


BARGAIN PRICE MONITORS A pret incece 17:58 VAT 


To keep your costs down, the price you see is the price you pay - 
WE HAVE BEEN SEARCHING FOR A HIGH QUALITY QL MONITOR 
* FOR A LONG TIME, WE THINK THE GOLDSTAR IS THE ONE! 


OFFER 1 - colour 

GOLDSTAR 14" Hi-Res with 0.31 dot pitch in stylish grey 

non glare screen (also O.K. for PCs) (Tilt & Swivel base £5) £199 
OFFER 2 - colour 

Philips 8833 Mk II - a lower resolution monitor than the GOLDSTAR 


but with stereo sound capabilities. 0.42 Dot Pitch. £279 
OFFER 3 - Mono-DIGIVISION with QL Connector 
12" Green Screen monitor, 2 Colour case £49 


QOL TO PC KEYBOARD ENHANCEMENTS 


OL/PC 102 keyboards - £25 UK version, - £35 
QOL/PC keyboard interface - £75 External fitting box & cable - £17 


PRINTERS Centronics - Serial Interface £27 if regd. *"°%*'neee \7-5* VAI 


Olivetti/TA dot matrix, up to 200cps/30 NLO, FX850 emulation - £129 
Canon BJ10ex bubblejet, very high quality (360 dpi), A4 size - £259 
OKI microline, ML183, wide carriage dot matrix printer - £129 

We can supply any make/model printer - please ask for details. 


QOL/Spectrum spares & repairs - please ask for details 


EEC LTD Payment terms: 


CWO, Access, VISA et cetera 
18-2] MISBOURNE HOUSE, 


os 
m VISA 
CHILTERN HILL. Cheques - allow 10 days cies 


Delivery: 
HALFONT ST PETER, i 
Gee: : ‘ Carriage - £9 Postage - £3 


SL9 QUE Product subject to availability. E&OE. 


Tel: 0753 888866 Fax: 0753 887149 





CARE ELECTRONICS 
SOFTWARE 87 (State MDV or Disc) 


MAKES YOUR QL TRULY MULTI - PEAT US a Siccscectcenssnenccdessxvens @ £79.00b 

FOUNT BIB ov isicneup os aranaetepsaesseess @ £15.00 
TASKING FOUNTED 88 ooosccecsscsccssseersssse @ £25.00c 
QPAC II Main menu windows adjust automatically 2488 PRINTER DRIVER. ............ @ £15.00c 


to size. Files, directory, view, print, delete, backup, Upgrade to Text 87 Plus 4 from V3.00. Return 
jobs, pick, Rjob, sort, channels, things exec, wake, master ; £39.00b 


buttons, Hotkey, Hotjobs. Fully multitasking, allows 
many programs torunat once. Requires min of 256k Upgrade to Text 87 Plus 4 from all other ver- 
OXPANGOEMERMIGRY césst.caspsscsdssssssscenacceeasecscateccuces sions. Return Master... £49.00b 


tn SPECIAL OFFER ONLY £39.48b Send SAE for further info on above. 


Upgrade QRAM to OPAC II return ese MIRACLE SYSTEMS PRODUCTS 


PLEASE SEND SAE FOR A COPY OK Disc Interface (inc Tool Kit Ill) ....... @ £99.64b 

OF THE QPAC II REVIEW QL Centronics Printer interface ......... @ £29.61d 
QPOWER REGULATOR QL HARDWARE : . 
QLKeyboard Membrane ............. 11.75 
Switch mode power supply, QL runs cool, Care Eprom Cartridges each nies £6.11¢c 
Stops lock ups (due to voltage drop). Helps YL A CHip ZX8301 .....ssesesse0sesee. @ £15.98c 


filter noise out. Simple to fit (no soldering) . 


sotaaetaauaageeteetys Senaseacactowasssieresedegsapane £25.85c READY MADE LEADS 


QL SUPERTOOL KIT Il by Tony Tebby 





RGB OL TOIMPAONG. ci cccccccsvessescsseonetseas £6.11¢ 
Over 118 Commands: Full Screen Editor, Key RGB 8-6 PIN ..0.........ccccccccesseseeeeeeeeseseens £7.52c 
Define Print Using, Last Line Recall, Altkey, RGB 8-7 PIN HITACHI ................0....... £7.52c 
Job Control, File Handling, Default Directories, RGB 8-7 PIN FERGUSON .................. £7.52c 
Extended Network. RGB SG: PINAOISCART: ...... ccc: <e5-250e: £1'1°75¢ 
16k Eprom Cartridge Version........ @£23.50d RGB 8PIN TO CM8833 MK II............ £11,756 
Configurable Version of Microdrive .............. 6WAY PCC TO 25WAY D ou... eceseeseeeees £9.87¢ 

@£23. 
TONY TEBBY SOFTWARE (QJUMP) 
ZITASOFT SOFTWARE by Steve Jones 





QTYP Type/Spell Checker ......... @ £30.55d 
LOCKSMITHE copies M/DRIVE - M/DRIVE QPAC 1-Desk top accessories, calendar, 
a See ee @£14.10c alarm, calculator, typewriter, digital clock 
4MATTER+LOCKSMITHE copies M/DRIVE  SYSMOMN ...........ccseseeseeceeeeeeetteeeeeees @ £22.56d 
SDB ESS es Seta Hg ait Sit eves Ses earo sos @£23.50c 

SIDEWINDER - High resolution printer driver 


prints full screens or parts of screens from CARE ELECTRONICS 
postage stamp size to large banners. Prints DEPT QL, 15 HOLLAND GDNS 


sideways, invert, scale, mirror, text insertion 


Et Oe eae an ae @£20.21¢ GARSTON, WATFORD, 
Shape hae oe - (for expanded see HERTS, WD2 6JN. 
includes all the features of above, PLU " x 
‘multiple label printing, desktop publishing Tel: 0923-894064 
files and printer drivers for The LC10 JX80 24 Fax: 0923-672102 

pin and colour printers (Please state 3.5" disc 

OL MIDIIVE) sacred iscsi ikasesstesaskese @£23.97c Berse acu baicage 


Upgrade to Sidewinder Plus ........ @£8.46c SERB I R=tsi10 “Cane'cnaige \G=ke30 


By Post. Enclose your Cheque/PO made payable to CARE 
HOW TO ORDER Electronics or use ACCESS/VISA. Allow 7 days for delivery 
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Simon Goodwin checks out 
the seven-disk C68 
programming public 
domain C-system. 


he C68 programming system is 

an important QL release. It is 

comprehensive, and it is free. It 

Spans seven disks, including 
source code so that you can customise 
and re-compile almost the entire system. 
The 1992 version 2 is reputedly bigger 
still, and even better. 

This article is based on several weeks’ 
experience of C68 version 1.05, plus news 
of the update. C68 is complete, conform- 
ing to the loose K&R standard and ap- 
proaching the latest ANSI C standard. 
Pre-written libraries support all Qdos traps, 
and the many standard C functions. 

You can use the C68 to write fast, pow- 
erful QL-specific programs, or change li- 
braries to get portable code using ‘glass 
teletype’ windows, that you can re-com- 
pile on any other micro with a C compiler, 
from PC, ST, Mac, and Amiga to Sun, 
Next and (D)RS work stations and beyond. 

The documentation includes about 150 
A4 pages in 20 Quill DOC files, plus a 
compressed 200K language tutorial. The 
preset document page length may be 64 
or 66 lines, and needs adjusting for fanfold 
A4 paper. In Quill or Xchange type F3 DP, 
then 70 or the length of your pages. 

C68 users require a QL with QJump’s Toolkit 
2, at least 384K of ram and one or more 720K 
disk drives. Extra space is handy, but not 
essential unless you want to re-compile eve- 
rything, unlike most MS— DOS C compilers, 
which are useless without a hard disk. 


Before C 


The precursor to C was BCPL (Basic 
Combined Programming Language) in- 
vented by Martin Richards at Cambridge 
University. BCPL was used to implement 
the Tripos operating system that spawned 
AmigaDos. BCPL is a simple language, 
with only one data-type, the word, making 
compilers easy to write and convert. It was 
the first compiled language implemented 
on the QL by Metacomco founder Tim 
King, and powered 1984 releases like QL 
Assembler, later renamed Assembler for 
the QL at the insistence of Sinclair's Intel- 
lectual Property department. QL BCPL 
generates slow double-offset 32 bit in- 
structions and was soon eclipsed by more 
flexible compilers. 

The C story began in 1970 when Ken 
Thompson, working at Bell Labs, USA 
wrote a compiler for a variant of BCPL, 
Known as B, as part of the development of 
the operating system Unix. 

B begat C, designed by Dennis Ritchie 
and loosely defined in the book The C 
Programming Languageby Kernighan and 
Ritchie, and refined in P J Plauger’s 
Standard C. Like Tripos, but unlike most 
earlier systems, Unix is largely written in 
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a high-level language. For more than a 
decade Unix and C have been held up as 
the systems of the future. 

The C compiler allows large, compli- 
cated programs to be written piecemeal, 
while permitting low-level bit-twiddling op- 
erations that might otherwise need as- 
sembler code. C is much more portable 
than assembler, as one ‘source’ file can be 
compiled into ‘object code’ for any proc- 
essor with a full C compiler. Unix versions 
proliferated in the 80’s, but are coming 
together again now, after 20 years of de- 
velopment. Every Unix system consists of 
thousands of little C routines working to- 
gether. Many fine, well-supported C pro- 
grams are in the Public Domain, thanks to 
their origins in the educational promotion 
of Unix. 

The first QL programs were written in C; 
Psion used a cross-compiler from their 
VAX 11-780 minicomputer. Later Quill et 
al were re-written in assembly code, shed- 
ding bugs, improving speed and reducing 
program size for Version 2. 

In1990 PDQLadvertisedasuperiorC system 
based on the later ST version of Lattice C with 
new libraries, but this was never released. 
Many of the features of PDQC, such as the 
linker and libraries, wound up in C68, along 
with other later developments. 

| shall illustrate that compiled C pro- 
grams are larger and slower than hana- 
crafted machine code to do the same job, 
but easier to maintain across many sys- 
tems. C68 is superior to BCPL or earlier 
QLC compilers, and generates suprisingly 
efficient code, if you tell it the right things. 

The C language translator is usually split 
into four tasks: pre-processor, parser, as- 
sembler and linker. Like Unix systems, 
C68 has a control program, CC, which 
calls the others as required. 


Task and data 


Version 1 of C68 stores tasks in two parts 
of the transient program area, like Quill. 
One holds the active task code, and the 
other is a data area. The amount of stack 
and heap memory available as a program 
runs is determined by a parameter option 
when it is loaded: 


EX FLP1_CPIO;"%200 =50" 


The % prefixes the heap requirement 
(200K) and = marks the stack limit, both in 
kilobytes. The parameter string may in- 
clude file names or other options up to 32K 


in length, and channels and pipes may 
also be passed to a task. The default is 8K 
of heap space, 2K for the stack of local 
variables and parameters, and 4K for each 
pipe. 

The new C68 Version 2 can allocate 
stack and heap space dynamically from 
the common heap. C68 tasks are not re- 
entrant, So you need one copy of the code 
for each task you run, but a shareable 
library is promised. 

All but the tiniest C programs are usually 
written as several files, later linked into 
one task. This reduces the amount of re- 
compilation that is needed after changes 
to the source, and avoids the temptation to 
re-invent the wheel. The Make utility reads 
file dates to determine when files have 
changed. To work properly this needs the 
extended dates supported by Miracle’s 
hard disk, Gold Card and the ST/QL emu- 
lator. 

The pre-processor CPP reads source 
and strips out comments, replaces names 
with constant values and selects condi- 
tional code. The header file NICE_H in- 
cludes CPP definitions to replace C brack- 
ets with meaningful words like WHILE, 
REPEAT and ENDIF, but sadly few pro- 
grammers use it. Listing one shows the 
format of a typical C68 library function, 
STRTOL, which scans text for a number 
and returns a corresponding binary value. 

The function has three parameters: 
NPTR, the address of the text in memory, 
ENDPTR, returned with the address of the 
last character scanned, and BASE, the 
number base from 2 (binary) to 36, using 
digits and letters A-Z. If BASE is initially 0, 
the actual base is determined from the 
text: a leading zero signifies octal, base 8, 
while Ox and OX mark the start of hexa- 
decimal values. 

Lines starting with a hash are processed 
by CPP. It replaces the first line #IN- 
CLUDE <CTYPE.H> with the text of the 
file CTYPE.H, which further #INCLUDEs 
the three-line file TYPES _H, which calls 
up SYS _TYPES_H. These define con- 
stants and macros for later use. 

STRTOL accumulates a 32 bit ‘long’ inte- 
ger value, but the 68000 cannot directly 
multiply two 32 bit numbers, as | explained 
in DIT Toolkit, August 1991. TEN MUL 
and _BASEMUL are macro definitions 
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which replace constant multiplications with 
additions and << binary shift operations, 
avoiding calls to the slow library routine 
.LMUL. CPP replaces later instances of 
these names with the code they define. 
There are serious but subtle bugs in 
listing one, but these show up rarely as 
most calls from other parts of the system 
let STRTOL infer the number base. These 
particular bugs may be fixed in Version 2, 
but they provide a good example of the 
general strengths and weaknesses of C. 
CPP generates temporary files which 
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are read by the parser. The parser C68 
analyses the pre-processed text and 
translates it into assembly language. C68 
comes with routines to generate 68000 
and Intel 386 code. The libraries assume 
the 68000 or its QL cousin the 68008, and 
no 386 assembler is included. 

The parser comes from Minix, the ‘tiny’ 
Unix system published in book form by 
Prentice-Hall. It generates good code if 
you set the right REGISTER variables and 
four pointers at once. With A6 and A7 
pointing at stacks, this leaves only four 


* C4é8-generated assembler output 
* Annotations by Simon N Goodwin 


«text 
«even 
strtol: 
link 
movem. 1 
move.1 
move.1 
move.1 
moveqg 
moveg 
Eas 
cir.w 
move.b 
move.w 
beg 
ecir.i 
move.w 
move.1 
addq.1l 
add.1l 
move.b 
and.b 
beq 
addq.1 
bra 
L2s 
clr.w 
move.b 
move .w 
cmp.w 
beg 
cmp.w 


aé, #-1G 


Parameters 


d3/d4/d5/d6/d7/a2/a3,—(a7) 


8(aé),a2 
12(aé),a3 
14(aé),d3 
#3,d5 
#9,d4 


d@ 
(a2) ,d@ 


#1,ad 
#_ctype,a@ 
{(a@) ,d@ 


(a2) ,dg 
da,d4 
#43,d4 
LS 
#45,d4 


Fetch NPTR 
Fetch ENDFPTR 
Fetch BASE 
RESULT = @ 
NEGATIVE = @ 
WHILE 


C = *NPTR 


-> if null 
ISSPACE (C) 


Make index 
1-256 from C 
Find table 


Test SPACE 
—-> not SPACE 
NPTR++ 

End of WHILE 


C = *NFTR 


ES 7+? 

—> if true 
—> if false 
—> if false 
1 if true 
Set result 


@ if false 


Set NEGATIVE 
NPTR++ 


BASE == 

-—> if false 
BASE = 14 
*NPTR == *@” 
—> if false 
BASE = 
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addq.1 
clr.w 
move.b 
move.w 
cmp.w 
beq 
cmp.w 
bne 
L14: 
moveq 
addq.1 
bra 
Lig: 
cmp.1 
bne 
cmp.b 
bne 
addq.1l 
cmp.b 
bne 
moveq 
bra 
L290: 
moveg 
L2is 
move.w 
bne 
cmp.w 
bne 
Lig9s 
addq.1 
Li7s 
LiSs 
Liss 
Lis 
subq.w 
wee 
addq.l 
clr.w 
move.b 
mave.w 
beg 
cle. 1 
move.w 
move.1 
addq.1 
add.l 
move.b 
and.b 
beg 
eir.d 
move.w 


#48, (a2) 
Lis 

#1, a2 
#129, (a2) 
L26 
#1,0a 
L214 


#9,do 


d@, d4 
Li9 
#88,d4 
Li7 


#1,a2 


#1,a2 


#1,a2 
da 
{a2),do@ 
da@,d4 
L235 

d@ 
d4,d@ 
d§,aa 
#1,aG 
#_ctype,ad 
(af) , da 
#4,d0m 





NPTR++ 


*NPTR 
== *»* 
—-> if false 
ES meme FY? 

-> if false 


BASE = 16 
NPTR++ 


ELSE 

BASE == 16 
—> if false 
*NPTR == *@” 
—-> if false 
NPTR++ 
*#NPTR == *x? 
—> if false 
1 if true 


@if false 


€C =ie sé! 


—— Fe & 


—> Always! 
NPT R++ 

> 

NPTR-— 


WHILE 
NPTR++ 


C = *NPTR 


—> if null 
ISDIGIT (C) 


Make C into 
index, 1-256 
Find table 


Test DIGIT 
-> not DIGIT 


Fetch C 


sub.1 
move.w 
bra 
L24: 
eirud 
MOVeE.wW 
mave.1 
elret 
move.w 
move.1 
addq.1 
add.1l 
move.b 
and.b 
beg 
moeveg 
bra 
L26: 
moveq 
27s 
move. 1 
sub.1 
add.1l 
move.w 
L2S< 
tst.w 
blt 
ext.l 
cmp.1 
ble 
L28> 
cmp.1 
bne 
move. 1 
add.1 
add.1 
add.1 
add.1 
bra 
L3is 
cmp.1 
bne 
move.1 
asl.l 
bra 
LSSe 
cmp.1 
bne 
move. l 
asl.l 
bra 


#48, da 
dG, d7 
L25 


da 
d4,da@ 
d@,—(a7) 
di 

d4,di 
di,a# 
#1,ad 

# ctype,ad 
{(af),di 
#1,di 
L26 
#65,d1 
L27 


#97,d1 


{a7)+,d@ 
di,d@ 
#19,da 
da, d7 


d7 
Lae 
d7 
d7,d3 
L23 


#10,d3 
L31 

d5,da 
da, dg 
do, da 
d5,da 
dG,da 
L32 


#16,d3 
L33 
d5,d@ 
#4,dq 
L34 


#8,d3 
L35 
d5,da 
#3,dq 
L36 


Subtract *@’ 
Set DIGIT 3; 


ELSE 


Fetch C 
Stack it 
ISUPFER (C) 


Make C index 
1-256 

+ Table base 
Extract byte 
Extract BIT 
—> Not UPPER 
2 ef 


s 2a? 


Unstack C 
— 74% = 7%? 
+ 104 

Set DIGIT 5; 


IF DIGIT < @ 
—-> negative 
>+ DIGIT 

>= BASE 

if so, BREAK 


BASE == 19 

-—> otherwise 
Use _TEN_MUL 
for * 14.L 

DP is DS * 4 
DS is DS # 5 
DS = DS * 18 


BASE == 16 

-> otherwise 
Prepare << 4 
DD = DDG * 16 


BASE == 8 

-> otherwise 
Frepare << 3 
D@ = DG * B 
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Bie. 
awe move.1 d5,—(a7) Stack X 
move.l1 d3,-(a7) Stack B 
jsr -~lmul The hard way 
addq.1 #8,a7 Tidy stack 
L3é: Base 8 done 
Bre Sra L34: Base 14 done 
Ls2s Base 1% done 
Ee eg iter ts ce move.l d#@,d5 Set RESULT 
ext.1 d7 
=. add.1 d7,d05 Add DIGIT 
bra L22 End of WHILE 
L2ss 
La: 
L8: 
tst.w dé IF NEGATIVE 
& beq LS7 —> if false 
move.1 d5,da Get RESULT 
Pa neg.1 dé Negate value 
move.1 d8,d5 Set RESULT 
move.l1 ai3,da Test ENDPTR 
beq LS? =? Se AL 
move.l a2, (ad) Set *ENDPTR 
LS9s 
move.l1 d5,dq@ D@ is RESULT 
L41: Restore regs 
- movem.1 (a7)+,d3/d4/d5/d&/d7/a2/ad 
unlk ad Lose params. 
Bice rts Return D@ 


-QGlobli strtol 
GL Warld March 1992, C library STRTQL source, page 1 of 1 
#include <ctype.h> 


/* defines to avoid long muls on a lowly 68k */ 


#define _TEN_MUL(X) (000) <2 By + OOF) SE 
#define _BASEMUL(B, X) \ 
(CCB) == 19) 2? _TEN_MUL((X)) 2 (((B) == 16) 2? €(X) <e 4) 
CCB) == 8)? \ COX) <2 3) 2 CORD 3FEKDD 09) 


LEHRER KEE EER EEE EEE EEE ERE HEH ERE KEK EE EEK HEE EK EK KEKE EEK HERE ERREE 
* Routine to use as base for all atoi, atol etc routines. 
* Used by scanf etc. * 
HEHEHE EEE KEE EEE HEHEHE EH HHH KEE KEK HEH KEKE EK E HEHEHE KE KKK KKKEEREKRE / 


long strtol(nptr, endptr, base) 
register unsigned char *nptr3; 
register char ##endptr3; 
register int base; 
{ 
register unsigned short c3 
register long result = @L; 
register short negative = @; 
register short digit; 


while ((c = *nptr) && isspace(c)) /* skip leading white space */ 
nptr++3 


if ({c = *nptr) == 
negative = (c 
nptr++5 


15 C == *—*) £ /* handle signs */ 
r7— 7) 


if (base == @) € /* determine base if unknown */ 
base = 103 
if (*#nptr == *@*) ¢€ 
base = 83 
nptr++5 
if Q4€ =_fnptr) == "sy? {1 c¢ == *KX*) € 
base = 1435 
nptr++;5 
> 
> 
else if (base == 16 && *#nptr == 7M") ¢€ 
nptr++5 /* discard @:/@X prefix if hex */ 
a#- (Ce = *nptr == 24") $F © ame KF) 
nptr+t+s5 


+ 
eo 


Rate ——s5 /* convert the number */ 
while (c = *++nptr) ¢ 
if tisdigitic)) 
digit = c +-_"*9’$ 
else 
Gigit = c = fisupper(c) ? °A’ = 7a") + 2103 
if (digit < @ {ti digit >= base) 
breaks 
result = _BASEMUL (base, result): 
result += digits 
3 


4 
J 


if (negative) 
result = -result$ 


if fendptr != NULL) /* point at tail */ 


*#endptr = (char *)nptr5 
return results 
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registers for the compilers own tem- 
plates. 

Listing two is the parser output that 
corresponds to Listing one, with my an- 
notations alongside, to show what's go- 
ing on. DO, AO and occasionally D1 are 
used for temporary results; if more space 
is needed, values are pushed onto the 
stack, as between L24 and L25. Prefix 
CLR instructions are widely used to clear 
the high bytes of registers that will hold 
unsigned values. 


LINK instruction 


The LINK instruction reserves storage 
space for the local variables, offset on A6 
like the parameters. In practice the space 
is never used, as all the variables in 
STRTOL are stored in processor regis- 
ters. The default code to fetch and store 
every value at an offset on A6 is less 
efficient, but allows more variables. 

Labels are numbered from L1; the com- 
piler allocates numbers as it goes along. 
Some are unused in this case; L41 is only 
needed if the function has multiple 
RETURNs, and L38 and L40 never ap- 
pear at all. 

The globallabel CTYPE points at 256 
bytes with bits set to categorise the char- 
acter codes 0 to 255. ISSPACE, ISDIGIT 
and ISUPPER generate code to look up 
a code and test the relevant bit in the 
table. The address of CTYPE is con- 
verted into an absolute address after the 
program is loaded. The ADDQ.L #1 in- 
structions could be eliminated if_ CTYPE 
pointed one byte later. 

L8 turns up rather late, and reveals a 
bug in the source. The second WHILE 
loop that scans digits is conditional to the 
test IF (BASE==0). The code never scans 
any digits if an explicit base is specified. 
It’s hard to see this from listing one, 
because of the erratic indentation of the 
source. 

Another subtle bug crops up between 
L10 and L19. The closing bracket in IF 
((C = “NPTR == ‘x’) should be before the 
== comparison. As written the code as- 
signs the value of *NPTR == ‘x’ to C, 
giving a true or false result, 1 or 0. The 
code fails if the number starts 0X. 


Register variables 


Register variables save time, but C68 
still has to transfer them into DO to perform 
calculations. The three lines before L37 
could be replaced with NEG.L D5, but the 
code generator does not spot this im- 
provement. 

The last three lines of source generate 
just four instructions, then C68 copies the 
result from D5 into DO, restores the old 
register values, un-links the local space 
and returns to the caller. 

The lines that start with dots are assem- 
bler directives. The supplied assembler is 
unfriendly and limited, but it works. Itis not 
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ideal for human programmers but suits the 
linker and assembly code subset gener- 
ated by C68. The linker is reputedly three 
times faster than the GST linker supplied 
by Sinclair and Metacomco, but greedy for 
ram. 

File utilities supplied with C68 include 
routines to maintain libraries and ARC, 
which can compress or restore groups of 
files in PC or QL format, with task headers. 
DIFF compares text files to find matching 
sections, but source for DIFF is not pro- 
vided. 

Phil Spink has written a public domain 
C68 task to read and write Unix CPIO disks 
ona 720K drive. With Multi-DiscOver, now 
marketed by Dilwyn Jones, the QL can 
expect a flood of C in future. 

Programmers need a text editor to write C 
source. Micro Emacs is the obvious PD 
choice for an expanded QL; | plan to explore 
that in a future article. Other programming 
editors such as ArcEd, Devpacand Spy The 
Editor, are suitable. 

In such a big system there are bound to 
be a few rough edges, and floating-point 
arithmetic was dodgy on versions up to 
1.05. The current library uses 32 bit (7 digit) 
decimals, but 64 bit 15 digit resolution is 
promised for version 2. 

There are some out-of-date object files in 


version 1.05. For instance the functions to 
convert QL and Unix universal dates give 
the wrong result by six hours, unless you 
re-compile LIBC_TIME C. 

Some bugs in the libraries stem from a 
lesser degree of testing than you might 
expect of a commercial product. Routines 
may work well in practice, but not as docu- 
mented. All this can be fixed, as you have 
the source to re-compile. 


Watch your step 


The C language does not tolerate fools 
gladly. Code written for pure efficiency is 
often dangerous and non-portable. The 
compiler is simple-minded, and putting 
garbage in breeds garbage out. The pack- 
age does not yet include LINT, a Unix tool 
that highlights machine-dependent or im- 
plausible code. Debugging facilities are 
available if you re-compile your program to 
include special signposts and error-trap- 
ping routines. Options allow single-step- 
ping, watch-points and checks for memory 
overflow. 

The separation of parts means that diag- 
nostic messages pop up all over the place, 
and they may be hard to relate to the 
source. It is easy for faulty programs to 
corrupt memory outside the task. This is 


often fatal for the entire Qdos or MS-DOS 
system; on Unix it only knocks out the task. 

Much of Qdos, with the notable exception 
of the file system, is modelled in style on 
Unix. The many parts of C68 may be 
daunting at first, but they provide a good 
grounding, and Unix enthusiasts will get 
quick results. 

Real Unix systems rely on monsterous 
hard disks and virtual memory, but many of 
their programs will now run on the QL, 
thanks to the conversion efforts of Dave 
Walker and Jeremy Allison. C68 means 
that new and interesting QL programs can 
be developed with a prospect of later con- 
version and sale on other machines. This 
will extend the life of the QL and encourage 
programmers to continue to use it. 

| have only skimmed the surface of C68 
here, and hope to explore floating-point 
and function calling in a future article. As 
usual, comments from readers are wel- 
come, care of QL World. 

C68 is widely available from QL PD 
suppliers, including CGH Services (£2.00 
per disk), Qubbesoft (£5.50 for all 7 disks 
in the UK, £6.50 for continental Europe or 
£7.50 anywhere in the world). Quanta 
members can have it for free, if they send 
blank disks to the C Librarian, Norman 
Dunbar. Try it! 





QD Ill - The first (and only) Editor using the Pointer Environment. Dynamic memory 
alec, Iss limit on numbers of lines, comfortable block-handling and many, many 
eatures. 


QMenu - the Menu Extension NOW IN VERSION 3! QMenu is a very easy to use 
interface with pre-defined menus (e.g. file-select, simple-choice boxes, select from 
lists). These menus may be used from SuperBASIC, machine code and other 


languages. File-select, directory-select and list-select all re-written with more options, 
multi-columns etc. £12.90 


Update from previous version with new manual £5 


FiFi — the FileFinder FiFi is easy to use and extremely useful. FiFi scans devices or 
directory trees and searches files or filenames for stings Combinations are possible, 
e.g. String 1 AND String 2 BUT NOT String 3 etc. £16 


DISA — Intelligent Disassembler which allows you to disassemble interactively any 
ind of machine-code. Generates ASCll-output which may be assembled using the 
GST (Macro) Assembler. £29 


QDOS Reference Manual - This book is a must for all m-code programmers. It 
explains how to use QDOS, all traps and vectors, the Thing System, the HOTKEY 
System Il and much more. It points out which features work on a QL, an Emulator an 

how to write compatible for the future operating systems. DIN A5, 170 pages. £30 


QPTR - The Pointer Environment Toolkit Revised manual which describes how to use 
the Pointer Interface and the Window Manager from SuperBASIC and machine-code. 
eae comes with examples on disc, keys, macros and extensions for SuperBASIC. 


FLP/RAM Level 2 now with ATR!!! Replacement EPROM for SuperQBoards (V1.17 
onwards, with & without mouse) or TrumpCard (please specify!). New Manual! Real 
sub-directories! QL-Emulator compatible! About twice as fast, with improved slave- 
block-handling! £18 

EASYPTR Il - Create your own Pointer-Env. menus & sprites, use them in your own 
SuperBASIC or machine-code programs. ane all the PE facilities, even split 
application sub-windows and uses the Menu Extension! Many examples an 


manual! £49 


etter 
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QL-Emulator for ATARI ST 
(260, 520, 1040 and all Mega’s, but no STE’s). This hardware, together with software 
turns any ATARI into a QL. The emulator supports the standard MODE 4 as well as 
a MODE 4 in much higher resolution (768x280). 
The QL emulator does not interfere with AT-emulators, it also runs even faster if 
accelarator cards (HyperCache, AdSpeed) are built into the machine. Of course, it 
supports real subdirectories (complete Level 2 device drivers) on floppy, hard-disk and 
RAM-disc. 
The complete QL emulator package includes a lot of utility software and extensions. 
If you are interested in an emulator, you should write for more information £166 
EPROM Cartridge for the QL-Emulator, switchable 
— with standard drivers £33 - with extended drivers £33 
Floppy adaptor to connect QL discdrives to the ST £9 
Monitor-cable ATARI to Scart £9 
Centronics-cable 2m £6.50 5m £10.50 

Games 


Diamonds £11 - BrainSmasher £12 - Arcanoid £10 

Firebirds £10 - SuperGamesPack £25 - QShang £14 

Pack of 10 3.5" discs MF2DD £3.10 - MF2HD £6.30 

QSUP System Utility Pack £26 - Thing & Epon Manager £18.50 

QDesign - Graphic-and Design-program (9 & 24 pin) £38 (Deskjet & Laserjet) 
£45 - Poni: Vector Ecktor for QDesign £19 

DataDesign - Database program £55 

Please add £4.00 for postage and package (Europe) or £4 for one item and 
£2.50 for every further item (Overseas). All prices excl. V.A.T. E&OE. 


E ANC Ox 
rena Reread 


Cards welcome! No extra charge! 
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Howard Clase 
continues with the 
second part of his 
Abacus thesis. 


f I haven’t convinced you of the ad- 

vantages of using Abacus rather than 

SuperBasic for a single calculation, 

consider the kind of problem that 
involves repeated application of a single 
formula with a varying parameter — for 
example the height of a missile at various 
distances during its flight. This is shown 
in Listing one. 

AUTO CALCULATE is turned off 
(<F3>, <D>, <A>, <ENTER>) so that the 
velocity and angle data can be altered 
easily in rows 9 and 10. The X values 
(horizontal distances) are generated by 
the formula in B14: row( ) returns the 
numerical value of the row and you have 
to subtract the number of first row (here 
14) so that you start at the right place; the 
multiplier — in this example 25 — sets the 
increment between values. I set the incre- 
ment large in my example to avoid filling 
the pages of QL World with too many 
meaningless numbers, and chose a smaller 
value and a longer table for better resolu- 
tion. Columns Cand D contain the formula 
for calculating the height (Y) as a function 
of distance (X) (in ordinary algebra this is: 


y = x*tan(a)-g/2/v%2*x%2/(cos(a))%2, 


where a, v, and g are angle, velocity and 
gravity respectively. This simple formula 
doesn’t allow for wind resistance ). Once 
you have typed this into C14 you can 
ECHO (<F3>,<E>) or COPY (<F3>, <C>) 
it to D14, but you then have to AMEND 
(<F3>, <A>) it to change the absolute ref- 
erences. Abacusis able to handle correcting 
relative cell references when formulae are 
copied around the grid — and even when 
extra rows or columns are inserted, but 
absolute values are left alone. In this in- 
stance all the $C references have to be 
changed to $D. Once you have got the first 
row of your table working you can gener- 
ate columns as long as you like (memory 
permitting) in two ways: either by using 
the ECHO command (<F3>, <E>) or (my 
preference) by AMENDing (<F3>, <A>) 
the cell to read: col = [old formula], then 
press <ENTER> and put in the range you 
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require. This should be done for columns 
B, C, and D. You can of course use any 
formula of your own devising and set up 
as many parallel columns as you need. 
The grid has also been prettied up a bit by 
reducing the column widths (<F3>, <G>, 
<W>) TO 7 (A) OR 6 (B-E), and the num- 
bers set to integers (col B) or two decimal 
places (cols C and D) using the UNITS 
command (<F3>, <U>, etc.) Incidentally 
for an instant report of the current width 
of a column, type WIDTH() into a blank 
cell in the column (don’t forget the brack- 
ets). 


Graphs are best 


Unless you have an amazing head for 
figures columns of numbers are not very 
informative; this sort of data is best pre- 
sented in analogue form by way ofa graph. 
You can plot a crude kind of graph in 
Abacus, but you get a much better picture 
if you export the data to Easel. The same 
approach can be used to produce a graph 
of any mathematical function. 

I am not aware of a currently available 
commercial graph plotting program, but 
there have been at least three good ama- 
teur SuperBasic programs written: two 


iT. 
{ ob 
Lt? 
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Axis 1 


<<< Traj_aba >>> 


we. py 1 2 
Missile Trajectory 


Move the cursor to the 
ppropriate cell to enter- 
alue. Then press <F3>,<X>. 


co i &m Ooh Fe 


I 
I 
9i:Velocity (m/s) 
10{;Angle (deg) 

11|Gravity (m/s%2) 9.8 
12h; 

13} 

14! 

15:3 

16} 

ty 

18} 

19} 

20} 150 


FORMULAE 


B14 (row()-14)*25 


C14 B14*TAN(RAD($C10) )-$C11/2/ 
$C9°2*B14°2/COS(RAD($C10))*2 


D1i4 B14*TAN(RAD($D10) )-$D11/2/ 
$D9°2*B14°2/COS(RAD($D10))*2 
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are available from the Quanta library, but 
the Microdrive Exchange version doesn’t 
seem to have survived the coup! (As the 
author of one of them any further review 
from me is inappropriate.) If you have not 
got access to one of these then the Abacus / 
Easel method can give good results. The 
designer of the export/import interface 
between Abacus and Easel clearly had 
financial spreadsheets most in mind, so it 
is not as convenient for our present pur- 
pose as it might be, but as long as you keep 
to the rules it works quite well. 

In the following discussion I shall as- 
sume the usual labelling of the axes, ie the 
Y axis is vertical and the X horizontal and 
also that the data are arranged in columns 
rather than rows. 


Easel limitations 


The first drawback is that Easel really 
only plots a series of Y values assuming 
that the X intervals are equally spaced. 
You can label the X axis with the values, 
but Easel cannot respond to the values; it 
just treats them as text. This means that 
you cannot increase the ‘resolution’ in 
areas of special interest; your table of X 
values must be evenly spaced. I find the 
easiest way to do this is to use the ROW( ) 
function to generate the X value as illus- 
trated in Listing one. 

The next problem is that your EXPORTed 
data block must have a TEXT label at the 
head of each column. If not the column is 


nmg$= 


Q_tskf 
Q tskf 
REMark 
DEFine 
REMark 


PROCedure 


either ignored altogether or the first item 
of data is replaced by a default label (eg 
COLBS$). The column of X values has to be 
in text format too. Fortunately it is quite 
easy to convert a column of values to text. 
To get a good graph set the increment so 
that there are at least 15 rows of values of 
interest in your table,and save your Abacus 
program to disk or mdv, since itis easier to 
re-LOADitthan undo the following. Then 
make sure that AUTO- CALCULATE is 
off and AMEND the formula in the first 
cell of the column (B14 here) as follows: 
add ‘col=str(’ before the existing formula 
and ‘,2,0)’ after it (don’t type the quotes!) 
so that it reads: col=str (old-formula,2,0). 
(The 2 selects integer format and the Ois a 
dummy —see the ‘str’ function in the guide 
for more information.) Press <ENTER>, 
and tell Abacus which rows you want to 
extend your alteration to. This will replace 
all the numerical entries in the column 
with the equivalent character string. If 
you have done it right (and you haven’t 
altered the justification defaults) all the 
numbers will move across to the left- 
handsides of their cells. Nothing else in 
the grid should change. Now EXPORT 
your block of data to Easel (<F3>, <F>, 
<E>, <E>, block reference) making sure 
that the block includes the text labels. In 
the example the block would be B13:D20. 
If you give the file a name like ‘Traj’ it will 
appear on your default device as 
“hae EXD! 

Now move to Easel. Select the appropri- 
ate display format — 3 is a conventional 


“Aba _Eas_ boot" 


“mdvl_abacus",160: G@LEAR 
“mdv2_easel",64: CLEAR 


ANKRAKRKRAAKRAA RA AKA AKAAKRAAAKAMAKRMAKRKAAKAAMRAMRAARMAMMAAAAR 


Q_tskf (task name$,sp$) 


see: Simon Goodwin QL World April 1989 p 26 


LOCal sys_vars,task_tag,ch_bas,last_ch_num,ch_ptr 


Sys_vars = 163840 


Space = 


“O"&sp$: DIM dummy$(space-1,1022) 


IF Sys_W(96)=0: POKE_W sys_vars+96,1 


task tag = 
PAUSE 200 
ch_bas = 


Sys_W(96): 
Sys_L(120): 


EXEC task_name$ 


last_ch_num = Sys_W(114) 


FOR ch ptr = ch_bas TO ch_bastlast_ch_num*4 STEP 4 
IF PEEK(ch_ptr)<> 255: REMark is channel open? 


ch def = PEEK L(ch_ptr) 
If PEEK_L(ch_def+4) = PEEK_L(PEEK_L(ch_bas)+4) 


If PEEK_W(ch_def+8) 


= task_tag 


IF PEEK L(ch_def)>120 
POKE ch_def+67,1: EXIT ch_ptr 
END IF :END IF :END IF :END IF 


NEXT ch_ptr 


PRINT\ "Warning, no con channel in 


END FOR ch_ptr 
END DEFine 


“;task_name$ 


REMark ABS AAR A AAD ANA ARAARBRARARRNAAAKMAAMARABRMAAMRAMARAARAKAR 


DEFine 
RETurn 
REMark 
DEFine 
RETurn 


FuNction 


FuNction 
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Sys_L(ad) 


PEEK L{(sys_varstad): END DEFine 


NA AKRAARARARAMAAKAKRANRMRAKRARAARAARANKRARAAAKRAAAAAAA 


sys_W(ad) 


PEEK _W({sys_varstad): END DEFine 
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graph — by <F3>, <C>, <F>, <3> and IM- 
PORT (<F3>, <F>, <I>, “Traj”) to see your 
graph. In this instance you will get two 
trajectories for 60° and 30°, and demon- 
strate that the ranges are both the same, 
but that you would be better advised to 
use 60° if there are tall trees between you 
and your target. Of course you can dump 
this to your printer too; Figure one shows 
the output I got from “Traj__aba’ using an 
increment of 10. 


Switching 


If you have Taskmaster or one of the 
other multitasking facilities switching be- 
tween Abacus and Easel is easy. If you do 
not have a multitasking facility like 
Taskmaster or Oram and have a mini- 
mum of 256K extra memory you can use 
Simon Goodwin's Taskforce (QL World 
April 19 1989) modified as in listing two. 
This will work as a boot on its own, but 
you may, of course, add extra lines of your 
own eg to activate TK2 or Speedscreen or 
toset ALTKey definitions. I know it works 
with a JSU rom, and I think that it should 
work with other Sinclair roms, but cannot 
guarantee it. It will need modification to 
work with Minerva in two screen mode. 

Lines 110 and 120 should be altered ac- 
cording to your system — eg if you use 
disks then it is easy to have both programs 
on the same disk. I happen to be writing 
this on my backup machine whose only 
adornment is an extra 256K. It requires a 
certain amount of juggling of mdv car- 
tridges since both Psion programs are 
configured for mdv1, so the right one has 
to be there when required eg for help or 
printing. (You do not need to reconfigure 
them just to EXEC them from a different 
drive.) The second parameter is theamount 
of memory (K) protected (in the array 
dummy$ at line 180) so the larger the 
number the smaller the space available for 
your Psion program. The numbers given 
divide the spare memory about equally 
between the two Psion programs and Su- 
perBasic for this amount of memory. 

In operation you switch between the three 
by pressing <CTRL+C>; <SHIFT+F5> will 
restore your Psion windows, and you have 
to use the CLS#n command to clear the 
SuperBasic windows. If you have TK2 this 
is an obvious application for the ALTKEY 
function. Youcan of course use the routine 
to multitask any two EXECed programs — 
or more if you have enough memory. For 
more information on Taskforce see the 
original article (line 150). 

If you do not have extra memory then 
you will have to reset and reboot with 
Easel. 


Marks not money 


Apart from the fact that the numbers 
represent marks rather than money this is 
very similar to a financial spreadsheet, but 
I include it because it illustrates the use of 
the rarely used ‘lookup’ function and also 
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contains a printing trick. The printout and 
formulae are shown in listing three. 

Where a formula is used over a range of 
cells I give the range, and show the for- 
mula as it appears in the first cell. Since all 
the addresses are relative it can be easily 
copied to the other cells by using the 
COPY, ECHO, row=, or col= facilities as 
appropriate. The average formula in row 
12 only occurs in alternate cells, the sim- 
plest way to achieve this is to echo to the 
whole block (D12:J12) and rubout (<F3>, 
<R>, <ENTER>) the cells you don’t want. 

The various marks are entered directly 
into columns D, F and H, and the total 
calculated in column J. We have to round 
off marks to the nearest 5 and letter grades 
are awarded as follows: A100-80, B75-65, 
C 60-55, D 50, F 45-0. The first is accom- 
plished in cells L6:L10 using the usual 
rounding off formula and the letter grades 
determined from the lookup table in the 
block N12:017. This requires a more de- 
tailed look. 


Lookup table 


The lookup table is just two columns of 
numbers, the first is the lowest mark for 
each grade in descending order, and the 
second the Ascii code of the correspond- 
ing letter. The lookup command isin three 
parts: the range to search, the offset of the 
column where it will find the answer, and 
the value to search for. Consider M6, the 
value to search for is found in L6 ie 80. The 
search starts at N6, and continues down 
until it finds the last cell containing a 
value no greater (equal is OK) than the 
search value of 80. It then returns the 
corresponding value found in the column 
offset by the specified amount. In this case 
the offset is 1 and the return value is 65, 
the Ascii value for the letter A. It is obvi- 
ously important to have the values in 
your lookup list in descending order, and 
you must include both the minimum and 
maximum values in the table. 


Lookup limitations 


Unfortunately, the lookup function in 
Abacus is not very well thought out. The 
main problem is that only relative and not 
absolute addressing is allowed. This 
means that the command starts looking 
for the table one row lower each time it 
descends a row of the table. The only way 
around this is to put the top of the lookup 
table lower than the lowest cell that calls 
it and leave the column above free of any 
numerical values (luckily it ignores any 
text entires it may come across, sO you 
could put some text in column N — in fact 
I do, but it doesn’t appear on screen — see 
below). Lookup tables can be in rows as 
well as columns in which case turn all the 
above comments sideways. 

The other point of special interest in this 
Abacus program is the invisible text in the 
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upper part of column N. I find itis easy to 
lose my place when looking across wide 
tables of numbers, unless they are di- 
vided horizontally at regular intervals — 
every five is about right. The formula in 
N6:N10is the way to do this on the printer; 
[have set the interval to three here to keep 
my example table small. The condition 
tests whether or not the row-number- 
plus-one is an exact multiple of three, if 
not it prints an empty string, and if it is it 
prints an Ascii 10, or line feed. This doesn’t 
appear on the Abacus screen either, but it 
does have the desired effect on the printer 
as you can see. I usually use the ae diph- 
thong character <CTRL+SHIFT+8>-— Ascii 
138 —instead of CHR(10), since my Epson 
printer treats this as a line feed too, and I 
can see where the blank line is going to 
come in advance. You'll have to test this 
out on your own printer. 


Column widths 


The bit at the bottom below the double 
line isn’t really part of the program, but is 
just put in to show how I have adjusted 
the column widths. The two formulae in 
A20 and A21 both give text, and the block 
(A20:021) is centrally justified. 

In my introduction I mentioned that I 
had, on occasions, used Abacus to gener- 
ate pure text output. This has been for the 
production of voting slips, tickets and 
other small items that require the use of a 
guillotine on regular sized pieces of pa- 


per. The trouble with Quill is that while 
you can copy whole lines vertically, you 
cannot copy part lines horizontally — but 
you can do this in Abacus. 


Border pattern 


The example shown in listing four is 
more or less self evident. It started with a 
20 character x 11 line block A1:C11 — to fit 
neatly onto a 80 x 66 page (24 in all). Note 
that the formulae which generate the bor- 
der pattern all refer absolutely to A2 
(including A2 itself initially), get your 
text looking right in the prototype, and 
then copy it to fill a horizontal row with 
clones. Edit the serial number cell in the 
clones to increment the copy on its left by 
one, and then copy the rows down the 
page, changing the serial number of the 
first ticket on each new row to calculate its 
value from the one above so that they 
ultimately all refer back to the value in the 
prottoype. 


Serial numbers 


Once the page is complete you can 
quickly change the border character by 
inserting a new character into cell A2 and 
pressing <F3>, <X>, and you can change 
all the serial numbers by changing the 
value in B10. Of course anyone with a QL 
will be able to forge their own tickets, but 
they should be pretty easy to track down 


<<<< Class_aba >>>> 


> 


B iC; D 


(Ej 
Chemistry 2210 


Term 


Aardvark, Ethel 
Bartok, Bella 
Caesar, Julius 


Onan r ONF 


Dean, James 
Eliot, Thomas 


ow 


1 
aR 


F 


Fall 1999 


Final Total 


Widths 


Key Formulae 


>M5,A11:M11 
:A10 
:J10 
:L10 
:M10 
N6:N10 
D12, E12 ,J312,5282 


row()-5 
D6+F6+H6*0 .6 


A20:020 
AZi: O21 


chr(col()+64) 


str(width(),2,0) 


rept("-",width()+1) 


5*(int((J6+2.5)/5) 

chr (lookup(N6:N17,1,L6) ) 

if ((row()+1)/3-int((row()+1)/3)>0,°" 
ave(D6:D10) /D4*100 


,»chr(10) ) 
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€<<< Ticket_aba >>>> 


— you probably know all the likely forgers 
in your area already! 


The generation of attractive looking ta- B 'C'p! E iF 


2 -- 


‘ 
1A 
bles is also easier using Abacus than with 1 |%URUHKKHKK HNN KWH HNN NH IN NHN 
Quill. Although Quill has a fairly flexible 21% New Millenium % New Millenium % 
TAB command I find Abacus more useful 5 a Party 5, Party : 
fe | haere ae 51% December 31 2000 % % December 31 2000 % 
to generate nice borders using “col = ”, 6 1% 10.500 om 9% 12.2B pm % 
rept() etc (see my ticket example) and the 71% ~ % 
option to ORDER the columns in alpha- 8!% Admit One % Admit One % 
betical or numerical order is often useful. 9 1% $25 76 $25 % 
19 {% 1% % 2% 
11 | %RKRBBKKBUBKKVB MII % INH 26% 76% 1o 2016 Po M620 767076407 
12 | %%% 626% 20% 2267076 70% Fo 770 Fo 70 oe 
Milleni % New Millenium 
Best calculator ag ee 5 ee : 
% 
December 31 2900 *% December 31 20900 % 
, 4% 
In these two articles I have tried to dem- 10.02 pm . oe oeRs 9% 
onstrate why many professional scientists Admit One % Admit One % 
have taken to spreadsheets as the best new $25 % $25 % 
calculation aid since the invention of the 3% % 4% 
hand-held calculator. If you are a student 22 | KKB AB boro bo oIe% 7% IIo Io 70% Jo% 70% 7076767676 
or teacher in maths, physics or chemistry I 
hope I have given you some ideas as to F 
ormulae 
how useful Abacus can be. In fact whatever 
you do, if you have just been using Abacus A1:Bi, A1i:B11 rept($A2, width()+1) 
to balance your cheque book or even not at A2:A1@, C1i:C1l1 $A2 


all l hope I have been able to convince you Bid+1 
that itis worth a second look- don’t let the a 
B1@+2 
accountants have all the fun! How about B214+1 
an Abacus game, someone? 








C.G.H. SERVICES 


Cwm Gwen Hall, Pencader, Dyfed, Cymru, SA39 9HA 
(Tel. 0559 384574) (9am - 5pm) 


PUBLIC DOMAIN 
AND SHAREWARE LIBRARY 
ALL DISKS £2.00 EACH INCLUSIVE OF MEDIA AND P&P 


ADVENTURE GAMES DISK 1 (includes fantasia and ye classical type of adventure) 

ADVENTURE SOLUTIONS DISKS 1-3 (includes The Pawn and Mortville Manor, mainly ST throughout) 
ADVENTURE SOLUTIONS DISK 4 (QL specific) 

ADVENTURE GAMES SOURCE CODE DISK 1 (includes Fantasia, Haunted House, etc) 
ADVENTURE UTILITIES DISK (includes Quill to SuperBasic coverter and demo adventure) 
AUSTRALIAN P.D. DISKS 1 + 2 (includes a wide variety of games, utilities etc) 
COMMUNICATIONS DISK 1 (includes QBOX Bulletin Board system) 

COMMUNICATIONS DISK 2 (includes QL Kermit) 

CONNECTIONS DISK 1 (includes ST - QL screen and file converters) 

DEVICE UTILITIES DISK 1 (includes Archiving, compacting, formatting and Shell programs) 
DILWYN JONES DISK 1 (includes many SuperBasic progs and Wordsearch) 

EDITOR'S DISK 1 (includes QED and MicroEmacs) 

EDUCATIONAL PROGRAMS DISK 1 (includes maths, music and chemistry programs) 
EMMANUEL VERBEECK DISK 1 (includes screen save and print progs, and many more utilities) 
ESOTERICA DISK 1 (includes DIY Pyramid construction prog. Biorythms and Psychology progs) 
FRACTALS DISK 1 (includes large numbers of mandelbrot and other fractal progs) 

FRACTALS DISK 2 (Carl Cronin's mandelbrot prog plus animation screens) 

FRACTALS DISK 3 (Rainer Kowallick's mandelbrot prog as amended to give "Jewel" effect) 
GAMES DISK 1 (includes Starburst, Cavern Frenzy) 

GAMES DISK 2 (includes many arcade type games) 

GAMES DISK 3 (includes QL War) 

GERMAN TO ENGLISH DICTIONARY (multi-tasking) 

GRAPHIX ANIMATION DISKS 1,2,3,4,5 (TV Movies) 

GRAPHIX DEMOS DISK 1,3,4 

GRAPHIX SCREENS (FIF FORMAT) DISKS 1,2,3 

GRAPHIX SCREENS (PIX FORMAT) DISK 1 

GRAPHIX SCREENS (SPECTRUM) DISK 1 

GRAPHIX SCREENS (ST) DISKS 1,2,3,4,5,6,7,8 

GRAPHICS/SCREEN UTILITIES DISK (includes sprite designer. CAD and window progs.) 

HAM RADIO DISK 1 (includes PC conversions) 

INDEXES DISK 1 (Quanta and QL User/World) 

MATHS DISK 8 (includes calculator, Pi and calendar creator progs) 

MONEY DISK 1 (Capital Gains Tax and Simple Book Keeper) 

OLIVER FINK DISK 1 (includes progs requiring Painter environment to work) 

PRINTER UTILITIES DISK 1 (includes label creators and printer tutorials) 

PROGRAMMING DISK 1 (includes QL PROLOG) 

PROGRAMMING DISKS 10-18 (Release |!) 

RALF BIEDERMANN DISKS 1 + 2 (excellent collection of programs, games, utilities, etc) 
RECREATIONAL MATHS DISK (includes life cellular automatons etc) 

SUPERBASIC UTILITIES DISK 1 (includes large numbers of utilities progs, toolkits, procedures, etc) 
TEXT DISKS 1-7 (The Bible - Old Testament) 

TEXT DISK 15-16 (The Bible - New Testament) 

TEXT DISK 14 (400+ Business Letters from U.S.A.) 

TYPING TUTOR (Artip - Touch typing tutor) 

THOR DISK 1 (Collection of Thor compatible programs) 

Please note the above are only part of our P.D. Library. New programs are constantly being added and more are always 
welcome. Please send an SAE for full catalogue. We can also supply commercial software for STs and Amigas! 
ALL PRICES INCLUDE MEDIA AND POST AND PACKING FOR THE UK. PLEASE ADD 10% FOR ORDERS IN EUROPE; 
20% OUTSIDE OF EUROPE. PLEASE INDICATE 3.5"/5.25"/MDV VERSIONS WHEN ORDERING. 








MINERVA mB (QL SPARES 


The ULTIMATE operating systen upgrade ere era oc # 
NKIT HINERUA now with battery for 256 bytes 68008 CpUsseeeeseess £8 1377 PALssssss £3 


rom, CRASHPROOF clock & interface (J'C) for 2. 
robots etc. Can autoboot fron battery ram.| | | ayontuareccrct: eye hour SUpplUers Elz 


Other features (common to MKI/MKII): BB49sessecsessecens £8 MOV ULA wsseees E42 


Autoboot on reset/ Multiple Basic? Faster Other components (sockets etc)... plse PHONE 
scheduler-graphics (18% of Lightning)-string 
screen/T 


handling etc’ WHEN ERROR/ Second RACE 

Foreign kybd drivers’ ‘Worm’ fast reset etc BULLET | N BOARD 
MKI to MKI UPGRADES: up to 1.79-£5, Rest FREE 

(send rom (PROTECT LEGS!) and disk or 2 mdvs) GIBBS - uk's first OL scrolling board 
QL Echomail around Europe, and FIDO netmail 


EB menceresesrsiiee Around 10ub of files including the UHOLE 
ALL VERSIONS FULLY GOLD CARD COMPATIBLE King James’ bible! 


: O7L=706 2379 UL e23e22e22bis 24hes 
AMeBccamicnntanel | 
























Viewdata/¥I52/0T100 OL TERMINAL EMULATOR QL REP A | Re S 
Multitasking for electronic mail, PRESTEL etc, 


Gr Sowntond. Compatible with Tonduta Goonnect: shat ote tested uth Thorn EMT test Fig 







QL modem/modaptor. Use Gconnect R5232C to drive 


unbuffered modems. Comprehensive AS manual. and RON softuare 


(MDV hardware extra if required) 
Software (3.5" or mdv) & manual E30 E27 - 6 month guarantee 


COMPUTER CLEANER MBE FILE TRANSFER 


HELP STOP POWER SUPPLY INDUCED LOCKUPS Programs to transfer text AND programs 
AND PROTECT COMPUTERS error free (XMODEM between computers 

Much improved mains filters. 48-88 db cut, 
Contain inductance, spike filters (three in Available for IBM PC and compatibles, 
3 & 4 uy) and certified 24@vac capacitors. ATARI ST and Sinclair QL. Connects to 


; Psion organiser via Psion comms Link 
“way a adaptor)., — 

re (Sa wrap Qualsoft program (per m/c) ..... £7.90 
4-yoy (13a trailing socket) a Serial lead (nome 2 computers)... £10 


Complete package for 2 computers. £25 
All prices include VAT and postage in the UK MAIL ORDER ONLY 


12 Bouverie Place, London Y2 1RB (tels O71-724 9853) 


SCROLLING BBS FOR ORDERING/QL HELP - 871-786 2379 <All speeds to U22bis) 
Fax: 871-786 2379 Prestel: 17249853 
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Simon Wallis goes 
back into his 

numerical routines 
and adds division. 


n my article of October 1990 I pre- 
sented a suite of routines which car- 
ried out arithmetic operations on 
arbitrarily large integers. This article 
expands the list of available operations to 
include division, uses fixed point arith- 
metic instead of being restricted to inte- 
gers, and explains how to calculate vari- 
ous trigonometric functions. Two pro- 
grams give examples of correct use of the 
routines — the first evaluates the math- 
ematical constant ‘e’, the base of Naperian 
logarithms; the second program is a four- 
function calculator. 





Pencil and paper 


The algorithms used for multiplication, 
addition and subtraction are essentially 
the same as in my October 1990 program, 
although all have been optimised and as 
such the assembly language listing is con- 
siderably longer. However the speed in- 
crease is well worth a few extra DATA 
statements. The algorithm used here for 
long division is based on the pencil-and- 
paper method we all learned at school. 
Although the algorithm is asymptotically 
not the quickest possible, it performs very 
well on reasonably small numbers, say up 
to a couple of hundred digits long. Be- 
cause it is so long, we are not printing the 
assembly listing (listing one) but this will 
be sent to any reader who sends a large 
SAE and postage to QL World. 

I chose to store a fractional number in 
the same way as I previously used to store 
an integer, but with a variable called 
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LISTING 2 - Machine code loader, and DATA statements 


REMark Routine to load machine code from data statements into memory 
DEFine PROCedure SetUpMcode 
LOCal loop, Checksum, a,b,c,d,e,f 
PRINT ‘Loading machine code from DATA statements’ 
maxlength = 80 : decimals = 20 
accumulator = 0 
base = RESPR (1280 + 20 * maxlength): REMark space for 20 bignums 
addr = base 
RESTORE 
REPEAT loop 
IF EOF THEN EXIT loop 
READ a, b, c, a, e, £, Checksum 
IF at+tb+c+dt+e+f <> Checksum: PRINT ‘Error in data’: STOP 
POKE W addr, a : POKE W addr+2, b: POKE_W addr+4, c 
POKE W addr+6, d: POKE W addr+8, e: POKE_W addr+10, f 
addr = addr + 12 
PRINT ’'.’;: REMark Some activity whilst loading machine code. 
END REPeat loop ’ 
PRINT 


DATA 18663, 3072, 18938, 1018, 31232, 14868, 87791 
DATA 51397, 18938, 1012, 55748, 19679, 48, 146822 
DATA 20085, 18663, 2056, 10241, 24832, 65502, 141379 
DATA 8780, 10242, 24832, 65494, 9292, 19679, 138319 
DATA 4112, 20085, 18663, 11400, 18938, 966, 74164 
DATA 31232, 14868, 10242, 24832, 65468, 8268, 154910 
DATA 10241, 24832, 65460, 6360, 20941, 65532, 193366 
DATA 19679, 4404, 28672, 20085, 18663, 18696, 110199 
DATA 18938, 926, 32256, 15892, 21383, 10241, 99636 
DATA 24832, 65426, 28672, 6336, 20943, 65532, 211741 
DATA 19679, 4242, 20085, 18663, 2056, 18938, 83663 
DATA 892, 28672, 12308, 21376, 10241, 24832, 98321 
DATA 65392, 18972, 26112, 6, 20936, 65528, 196946 
DATA 21120, 18938, 862, 14464, 19679, 4112, 79175 
DATA 20085, 49916, 40, 53934, 48, 45742, 169765 

DATA 52, 25198, 8310, 6144, 18938, 836, 59478 

DATA 32256, 15892, 31745, 18938, 824, 31232, 130887 
DATA 14868, 21381, 39559, 30463, 10242, 24832, 141345 
DATA 65320, 29184, 4636, 3073, 0, 26368, 128581 

DATA 4, 31744, 3078, 1, 26368, 10, 61205 

DATA 1537, 48, 28677, 20035, 20941, 65504, 136742 
DATA 3078, 0, 26368, 8, 29232, 28677, 87363 

DATA 20035, 29230, 28677, 20035, 10759, 21381, 130117 
DATA 29184, 4636, 1537, 48, 28677, 20035, 84117 

DATA 20941, 65522, 20085, 28922, 20085, 18663, 174218 
DATA 1912, 24832, 65258, 18426, 720, 31744, 142892 
DATA 18938, 710, 31232, 14868, 54213, 54725, 174686 
DATA 55237, 32256, 21381, 7713, 56866, 56838, 230291 
DATA 31744, 3079, 10, 27398, 31745, 1031, 95007 

DATA 10, 5895, 20941, 65512, 28672, 19679, 140709 
DATA 7904, 20085, 19074, 26368, 46, 18663, 92140 

DATA 27672, 18938, 648, 31232, 14868, 10241, 103599 
DATA 24832, 65150, 9804, 55234, 39554, 21381, 215955 
DATA 21378, 6363, 20941, 65532, 16924, 20938, 152076 
DATA 65532, 19679, 6198, 28672, 20085, 19074, 159240 
DATA 26368, 65528, 18663, 27672, 18938, 594, 157763 
DATA 31232, 14868, 10241, 24832, 65096, 10245, 156514 
DATA 39554, 55748, 9804, 38850, 21381, 21378, 186715 
DATA 6435, 20941, 65532, 28672, 6400, 20938, 148918 
DATA 65532, 19679, 6198, 20085, 18663, 27912, 158069 
DATA 10241, 10754, 29195, 24832, 65140, 30209, 170371 
DATA 29195, 24832, 65132, 8707, 29707, 24832, 182405 
DATA 65084, 8708, 24832, 65324, 29195, 29696, 222839 
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DATA 65532, 19679, 6198, 20085, 18663, 27912, 158069 
DATA 10241, 10754, 29195, 24832, 65140, 30209, 170371 
DATA 29195, 24832, 65132, 8707, 29707, 24832, 182405 
DATA 65084, 8708, 24832, 65324, 29195, 29696, 222839 
DATA 24832, 65070, 21123, 3075, 11, 26112, 140223 
DATA 65506, 29195, 24832, 65094, 32256, 18938, 235821 
DATA 484, 15892, 21383, 10245, 24832, 64986, 137822 
DATA 5148, 21122, 29195, 24832, 65274, 29696, 175267 
DATA 24832, 65022, 29697, 24832, 65328, 20943, 230654 
DATA 65512, 18938, 446, 29696, 13332, 29184, 157108 
DATA 24832, 65364, 28672, 19679, 4278, 20085, 162910 
DATA 18663, 3336, 18938, 418, 31232, 14868, 87455 
DATA 21381, 10241, 24832, 64918, 55749, 7700, 184821 
DATA 3079, 9, 26112, 16, 28672, 6272, 64160 

DATA 21388, 20941, 65518, 24576, 6, 20999, 153428 
DATA 6279, 19679, 4272, 28672, 20085, 18663, 97650 
DATA 7176, 18938, 360, 31232, 14868, 21381, 93955 
DATA 10241, 24832, 64860, 6164, 30217, 38404, 174718 
DATA 6339, 20941, 65526, 24832, 65444, 19679, 202761 
DATA 4152, 28672, 20085, 18663, 24832, 11777, 108181 
DATA 29184, 24832, 64876, 24832, 65478, 9223, 218425 
DATA 24832, 65112, 19679, 134, 28672, 20085, 158514 
DATA 18663, 1128, 24832, 64824, 18938, 282, 128667 
DATA 31232, 14868, 21381, 45834, 28160, 10, 141485 
DATA 27904, 12, 20941, 65524, 28673, 24576, 167630 
DATA 4, 28672, 18938, 248, 14464, 19679, 82005 

DATA 5664, 20085, 18663, 1128, 24832, 64772, 135144 
DATA 18938, 230, 31232, 14868, 21381, 45834, 132483 
DATA 28160, 14, 27904, 16, 20941, 65524, 142559 

DATA 24576, 8, 28673, 24576, 4, 28672, 106509 

DATA 18938, 192, 14464, 19679, 5664, 20085, 79022 
DATA 18663, 24840, 11778, 9217, 29185, 24832, 118515 
DATA 64736, 18938, 170, 29696, 13332, 24832, 151704 
DATA 65036, 9223, 29186, 24832, 64716, 29185, 222178 
DATA 24832, 64784, 11776, 29186, 24832, 64776, 220186 
DATA 40576, 29187, 24832, 64734, 29186, 29697, 218212 
DATA 24832, 65418, 19072, 26112, 98, 29188, 164720 
DATA 24832, 64714, 29188, 29698, 24832, 65346, 238610 
DATA 19072, 26112, 78, 29186, 9223, 24832, 108503 
DATA 64964, 29187, 29697, 24832, 64956, 29186, 242822 
DATA 29697, 24832, 65368, 19072, 26112, 22, 165103 
DATA 29187, 24832, 65172, 29185, 29698, 24832, 202906 
DATA 65266, 29696, 24832, 64610, 29186, 29697, 243287 
DATA 24832, 65334, 19072, 26368, 65490, 29186, 230282 
DATA 29697, 24832, 64954, 20943, 65470, 29184, 235080 
DATA 29699, 24832, 64576, 19679, 4230, 28672, 171688 
DATA 20085, 0, 50, 10, 0, O, 20145 

SUBTRACT base 702 

WRITENUM base 170 

MULTIPLY base 476 

DECIMAL base 1026 

SHIFTLEFT base 364 

NEGATE base 658 

INCR base 600 

ADD _ base 298 

NUMBASE base 1028 

COPYNUM base 52 

MAXLEN base 1024 

DIVISION base 840 

SETTOO base 92 

SHIFTRI base 418 

POKE W DECIMAL, decimals: POKE W MAXLEN, maxlength 
END DEFine a 


t+tteeeteetete+retrey 





LISTING 3 - Evaluation of ’e’ and sine(1) 
Use in conjunction with listing 2 


60 SetUpMcode 


70 t=19: CALL SETTOO, t: CALL INCR, t: CALL SHIFTLEFT, t, decimals 
80 BigSin t, 25 

90 PRINT \’SIN(1) IS EXACTLY ‘;: CALL Writenum, 1, 0: PRINT 

100 : 

110 t=19: CALL SETTOO, t: CALL INCR, t: CALL SHIFTLEFT, t, decimals 
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DECIMALS determining where the deci- 
mal point should be placed; for example, 
the number 12.34 might be stored as 
1234000 with a note that the last five digits 
should be to the right of the decimal point. 
Note that each number has the same 
number of decimal places, ie the variable 
DECIMALS is global, and if it is changed, 
then the setting-up routine (listing two) 
must be run again. 

The addition and subtraction routines 
needed no modification to operate cor- 
rectly on fixed-point numbers, as 1234000 
+ 1234000 = 2468000, which we can read as 
12.34 + 12.34 = 24.68. However, more care 
was needed for multiplication, where the 
result must be shifted to the right, and 
division, where the result must be shifted 
to the left. Consider 12.34/12.34, which 
we know is 1. 1234000/1234000 is also 
000001, which, given our machine repre- 
sentation, we should read as 0.00001. So 
the number of places to shift the result is 
the number of places that the implicit deci- 
mal pointis from the right-hand end of the 
number. This is implemented so that the 
numerator is shifted left before the opera- 
tion is carried out, and no check is made 
for overflow. Beware of this, and always 
make sure that MAXLENGTH and DECI- 
MALS-the maximum number of digits of 
precision and the size of the fractional part 
respectively — are higher than you will 
need. 


Big numbers 


The machine code loader program 
(listing two) allows room for 20 ‘big num- 
bers’, numbered 0to 19. Of these, 0through 
13 are used internally by the arithmetic 
routines, leaving you free to use 14through 
19 for your programs. The operations Add, 
Subtract, Multiply and Division each leave 
their result in big number # 0 — a sort of 
accumulator variable. The other routines 
— Copynum, SetTo0, Writenum, Shiftleft, 
Shiftright, Incr and Negate all operate ‘in 
place’, that is, they don’t have any effect 
on the accumulator (unless of course the 
accumulator is supplied as one of the ar- 
guments). 

If you ask your OL what the value of the 
mathematical constant ‘e’ is, for example: 


type PRINT EXP(1) 


you will get the result 2.718282. 

How does it know? And can we im- 
prove the accuracy of the result? One way 
of programming the EXP function would 
be to pre-compute it for all values, and 
store the results in a look up table. A nice 
idea, but there are far too many possible 
values which it could be asked. A book of 
four figure tables might have sixty pages. 
The QL only has a 48K rom — not nearly 
enough to store details of sines, cosines, 
square roots, exponentials, logarithms, etc. 
One method of calculating EXP(X) is to 
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Internal Nam 





120 
130 
140 


160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 
290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 
410 
420 
430 
440 
450 
460 
470 
480 
490 
500 


BigExp t, 25 
PRINT \’e IS EXACTLY ’;: CALL Writenun, 
STOP 
150 3; 


one = 12 
N = 13 
Nfact 
XpowN 
Result = 16 

temp = 17 

CALL SETTOO, one 
CALL INCR, one 


CALL SHIFTLEFT, one, Decimals: REMark number one now equals 1 


CALL COPYNUM, N, one 
CALL COPYNUM, Nfact, one 
CALL COPYNUM, XpowN, X 
CALL COPYNUM, result, one 
FOR loop = 1 TO iterations 
CALL MULTIPLY, Nfact, N 
CALL COPYNUM, Nfact, accumulator 
REMark Nfact = Nfact * N 
CALL MULTIPLY, XpowN, X 
CALL COPYNUM, XpowN, accumulator 
REMark XpowN = XpowN * X 
CALL ADD _, n, one 
CALL COPYNUM, n, accumulator 
REMark nen+v+i1 
CALL Division, XpowN, Nfact 


REMark accumulator = XpowN / Nfact 


CALL COPYNUM, temp, accumulator 
CALL ADD _, Result, temp 


REMark result = result + XpowN / Nfact 


CALL COPYNUM, Result, accumulator 


PRINT \ ‘’Loop=’ ; loop ! ‘’Result=’;: CALL Writenun, 


END FOR loop 
CALL COPYNUM, accumulator, result 
END DEFine 


510 : 


520 
530 
540 
550 


560 : 
DEFine PROCedure BigSin (X, iterations) 
LOCal loop, one, N, Nfact, XpowN, Result, temp 


570 
580 
590 
600 
610 
620 
630 
640 
650 
660 
670 


690 
700 
710 
720 
730 
740 
750 
760 
770 
780 
790 
800 
810 
820 
830 
840 
850 


870 
880 
890 
900 
910 
920 
930 
940 


40 


DEFine FuNction EVEN (g) 
RETurn (g + 1) MOD 2: END DEFine 
DEFine FuNction ODD (g) 
RETurn NOT (EVEN (g)): END DEFine 


ad 


one = 12 

N = 13 

Nfact 14 
XpowN 15 
Result = 16 
temp = 17 

CALL SETTOO, one 
CALL INCR, one 
CALL 
ALL 


SHIFTLEFT, one, Decimals: REMark number one now equals 1 


c COPYNUM, N, one 
CALL COPYNUM, Nfact, one 
CALL COPYNUM, XpowN, X 
CALL SETTOO, result 
FOR loop = 1 TO iterations 
CALL MULTIPLY, Nfact, N 
CALL COPYNUM, Nfact, accumulator 
REMark Nfact = Nfact * N 
CALL MULTIPLY, XpowN, X 
CALL COPYNUM, XpowN, accumulator 
REMark XpowN = XpowN * X 
CALL ADD_, n, one 
CALL COPYNUM, n, accumulator 
IF ODD (loop) THEN 
CALL Division, XpowN, Nfact 
CALL COPYNUM, temp, accumulator 
REMark temp = XpowN / Nfact 


IF ODD (loop DIV 2) THEN CALL Negate, temp 


CALL ADD_, Result, temp 
CALL COPYNUM, Result, accumulator 


REMark Result = Result + XpowN / Nfact 
PRINT \’Loop=’; loop ! ‘Result=’;: CALL Writenum, 


END IF 
END FOR loop 
CALL COPYNUM, accumulator, result 
END DEFine 





DEFine PROCedure BigExp (X, iterations) 
LOCal loop, one, N, Nfact, XpowN, Result, temp 


| spe or of Lleting 3, 
oe convergence of power series 


oe Result=1. 00000000000000000000 
- Loop=3 Result=0.83333333333333333334 
- ‘Loop=5 Result=0.84166666666666666667 
Loop=7 Result=0.84146825396825396826 
ss Loop=9 Result=0.84147100970017636684 
_—s- Loop=11 Result=0.84147098464806798140 © 
-« Loop=13 Result=0.84147098480865841976 ts 
 ‘Loop=15 Result=0.84147098480789370339 © 
Loop=17 Result=0.84147098480789651484 
Loop=19 Result=0.84147098480789650662 


op=21 Result=0.84147098480789650663 - | 


ante 


_icoses Result=0.84147098480789650663—t™~w 
IS EXACTLY 0. 84147098480789650663 


. Result=2.50000000000000000000 
“Result=2.66666666666666666666 


. Result=2.70833333333333333332 


—Result=2.71666666666666666665 
-Result=2.71805555555555555553 © 


=7 Result=2.71825396825396825394 ts 
,oop=8 Result=2.71827876984126984124 ts 
p=9 Result=2.71828152557319223982 


Result=2.71828180114638447967 ts 


=11 Result=2.71828182619849286511 
oop=12 Result=2.71828182828616856389 ~ 
p=13 Result=2.71828182844675900225 
soop=14 Result=2.71828182845822974784 
op=15 Result=2.71828182845899446421 
=16 Result=2.71828182845904225898  —_F 


=17 Result=2.71828182845904507043 © 





op=18 Result=2.71828182845904522662—t*~ 
9 Result=2.71828182845904523484__ 


0 Result=2.71828182845904523525 


D=21 Result=2.71828182845904523526 its 
=22 Result=2.71828182845904523526 > 
=23 Result=2.71828182845904523526 

D=24 Result=2.71828182845904523526 





Result=2. 71828182845904523526 | 


a ou 1s ‘EXACTLY 2.71828182845904523526 


use a power series — a formula which, if 
you add up enough of its terms, eventu- 
ally converges to an approximate answer. 
It is impossible to obtain an exact value 
for e, or pi, as both belong to the class of 
transcendental numbers. 


Values of e 


One power series is EXP(X) = 1 + X + 
X2/ 2! XS /3t+ + X°N/N!, where 
X°N means X raised to the Nth power, 
and N! means N factorial, the product of 
N with all the numbers less than it, ie N * 
(N-1) * (N-2)*...*2* 1. Listing three uses 
this power series to calculate an approxi- 
mate value of e. By approximate I mean 
correct to perhaps eighteen places of deci- 
mals. Although twenty places are printed 
out, the last few may be wrong due to 
small rounding errors being accumulated 
gradually. If you want to work out more 
places than this, adjust MAXLENGTH 
and DECIMALS accordingly, and increase 
the number of iterations. Beware that for 
large numbers of iterations, N factorial 
gets very large, so ensure that 
MAXLENGTH is large enough to avoid 
(undetected) overflow. Also, make sure 
that MAXLENGTH is always more than 
twice DECIMALS, for the reasons ex- 
plained earlier. 

Similar power series exist for trigono- 
metric functions, viz: 

SIN(X) = 0 +X +0 - X°3/3! + 
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Use 


100 
110 
120 
130 
140 
150 
160 


980 


in conjunction with listing 2. 


SetUpMcode 
Intro 
REPeat forever 


INTERNAL NUMBERS 2 


COS(X) - 1+ 0 - X°2/2! +0 + X°4/4! 

Note the alternating + and - signs be- 
tween successive terms. We can define 
TAN(X) = SIN(X)/COS(X), which saves 
finding a power series expansion for it. 


key = CODE (INKEY$ (-1)) 
SELect ON key . 
= 48 TO 57 ; NumberPressed Four functions 
= decpoint ; PointPressed 
= equals, enter : EqualsPressed 
= plus, minus, times, divide : OperatorPressed 


END SELect 
END REPeat forever 


DEFine PROCedure Intro 
MODE 8 


Listing four is a four-function calcula- 
tor. One point to note is the way the pro- 
gram handles the input of decimal num- 
bers. As you type in each digit of anumber, 


Stier c ieee id inet ee cae ei wninl eniciee! it shifts the number left by one place and 
ger part = ‘’; maxlength - decimals; igits nee 5 
PRINT ‘Maximum fraction part = ’; decimals; ’ digits’ ' stores the new digit at the right-hand end. 


accumulator = 0 : CALL SetTo0O, accumulator 
DisplayedNum = 12 : CALL SetTo0O, DisplayedNum 
CurrentNum = 13 : CALL SetTo0O, CurrentNum 
times = CODE (‘*’) 


divide = CODE ('/’) 
decpoint = CODE (’.’) 
minus = CODE (’-’) 
equals = CODE (’=’) 
plus = CODE (’+’) 
enter = 10 

LastOp = plus 

INTEGER = -1 
ShiftPending = INTEGER 
END DEFine 

DEFine PROCedure NumberPressed 


IF LastOp = equals THEN 
LastOp = plus 
CALL SetTo0, DisplayedNum 
CALL SetTo0O, CurrentNum 
END IF 
IF ShiftPending = 0 THEN RETurn 
PRINT CHRS (key); 
CALL ShiftLeft, CurrentNum, 1 


If you come to the end of a number and 
press the equals key (or whatever) without 
keying ina decimal point, then the number 
is an integer and must be shifted left DECI- 
MALS places. If you have keyed in a deci- 
mal point, the program must keep a count 
of the number of digits since the point, and 
shift the number left by DECIMALS minus 
this many places. 


POKE Numbase + Maxlength * (CurrentNum + 1) - 1, key - 48 


REMark least significant digit of CurrentNum 


IF (ShiftPending <> INTEGER) THEN ShiftPending = ShiftPending - 1 


END DEFine 

DEFine PROCedure PointPressed 
IF ShiftPending <> INTEGER THEN RETurn 
PRINT ”." 3 
ShiftPending = decimals 

END DEFine 


DEFine PROCedure EqualsPressed 
TestShiftPending 







Sample output of li 






LCULATOR 
part = 60 digits 
part = 20 digits 


FOUR FUNCTIO 
Maximum i 
Maximum 














on 





'000000000000000000 
















PRINT ’ = 7; * 4 = 000000000000000000 
WorkItout * 16 00000000000000000000 
CALL writenum, 1, accumulator * 25 | 
PRINT * 65 
CALL copynum, CurrentNum, accumulator / ie 
LastOp = equals 
END DEFine 11111 -00000000000000 
: 11223 
122333 

Moetenieercne ine BSE AcoreEesaee 55555555 46913579753086420 
WorkItout : : = 
CALL copynum, DisplayedNum, accumulator sia SARIN aa a a 
CALL SetTo0, CurrentNum # 8 = 6.28318530717958647688 
LastOp = key / 2 = 3.14159265358979323844 , ‘ 
PRINT ' '; CHRS(key); ' '; 999999999 * 999999999 = 9999999 19900000000000000000 
END DEFine | 
DEFine PROCedure WorkItoOut 
SELect ON LastOp 

= plus : call add_, DisplayedNum, CurrentNum 

= minus : call subtract, DisplayedNum, CurrentNum 

= times : call multiply, DisplayedNum, CurrentNum 

= divide : call division, DisplayedNum, CurrentNum 
END SELect 
END DEFine 
DEFine PROCedure TestShiftPending 
IF ShiftPending = INTEGER THEN 

CALL ShiftLeft, CurrentNum, Decimals 
ELSE 

CALL ShiftLeft, CurrentNum, ShiftPending 
END IF 
ShiftPending = INTEGER 
END DEFine 
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Systemati 


Programm 


In part four of his 
machine code tutorial, 
Alan Bridewell adds 
more screen control 
commands. 








n this series, we are building up a 
library of small chunks of assembler 
language code. Each of these will doa 
recognisable job within a program and 
be fully annotated, so that it will be clear 
exactly how to join them to other chunks to 
make a program and, in particular, how to 
make any necessary changes to make the 
chunks fit together. 

In this part, we are going to look at some 
more screen control commands. These 
are the ones concerned with interesting 
things like plotting points, lines, arcs, el- 
lipses and circles on the screen. Com- 
pared with the other commands, dealt with 
in part 3, these have two additional compli- 
cations. 

Each screen window has a pair of 'graph- 
ics coordinates’, x and y. By default, when 
a window is first opened, the bottom left 
hand corner of the window is the origin 
(x=0, y=0). The vertical scale of the win- 
dow is 100 units, which means the top left 
hand corner is the point x=0, y=100. The 
horizontal scale is the same size as the 
vertical scale, so the maximum x value will 
depend on the width compared with the 
height. This is all true, regardless of the 
size and shape of the window, but these 
actual values can be altered using the 
SCALE command. So the origin can be 
placed at any point in the window (or 
outside, if required), and the vertical scale 
can be made any value required. 

When we draw points, lines, arcs, el- 
lipses or circles ina window, the parameters 
we use refer to the coordinate system for 
the window, as defined by "SCALE', or 
using the default values if "SCALE' has not 
been used. For example, this means that 
when we draw acircle in awindow, the size 
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Listing i 





hhieidhithiiiiiieie eee LLL LLOLL CTL CT TTT TTT TT eer Tee 
“POINT ’ 

MighthaleheliehihiiiiiihdhiehddeheLLLLLLLLL COLL CCT TT TT TCT TT 

THIS ROUTINE PLOTS A POINT IN THE WINDOW USING GRAPHICS COORDINATES. 








- DIVISION GF THE FIRST INTEGER BY THE SECOND. 
THE FOUR PARAMETERS ARE ENTERED IN THE INTEGER TABLE 





a 
m 
) 
Cc 
ln 
=f 
O 
TI 
oj 
< 
m 
TI 
Uv 


PUT RI STACK SO BELOW TOP OF DATA SPACE. 
» POINT LEA.L —-S0 (AS) ,Al 3; RI STACK ON Al 






MAKE ROOM FOR 1ST INTEGER 








SUBQ.L #2,A1 ; INTEGER = 2 BYTES 
; PUT FIRST INTEGER ON RI STACK 
MOVE. W PXA,O(A6,A1.L) 
3; CONVERT TO F.P. 
MOVER #8, DO 3; #RI_FLOAT ON DO 
MOVE. W $11C,A3 3 RI_EXEC ON As 





JSR (AB) 
REPEAT FOR 2ND INTEGER 

SUBQ. L #2,A1 

MOVE. W PXB,0(A6,A1.L) 













MOVE® #8,D0 
JSR (AS) 
¢ NOW DIVIDE ONE F.P. NUMBER BY THE OTHER TO LEAVE X COORD ON RI STACK. 
MOVE@ #$10,DO 3 #RI_DIV ON DO 
JSR (AZ) 
3; USE NEXT LINE IF A NEGATIVE X COORDINATE IS REQUIRED 
; JSR NEGATE 






“=e we 


NOW REPEAT THE WHOLE THING FOR THE Y COORDINATE 
MAKE ROOM FOR 1ST INTEGER 

SUBQ.L #2,A1 
PUT FIRST INTEGER ON RI STACK 

MOVE. W PYA,O(A6,A1.L) 















CONVERT TO F.P. 









MOVE® #8,D0 ; #RI_FLOAT ON DO 
JSR (AZ) 
REPEAT FOR 2ND INTEGER 
SUBQ.L #2,A1 
MOVE. W PYB,O(A6,A1.L) 












MOVE® #8,DO 
JSR (AS) 
3 NOW DIVIDE ONE F.P. NUMBER BY THE OTHER TO LEAVE Y COORD ON RI STACK. 
MOVEG #$10,D0 3 3 #RI_DIV ON DO 
JSR (AZ) 
3; USE NEXT LINE IF @ NEGATIVE X COORDINATE IS REQUIRED 
; JSR NEGATE 
5 





NOW PLOT THE POINT 





MOVE.L {A7) , AO 3 OR 4(A7),AO OR 8(A7),AO ETC. 
5 CONSOLE CHANNEL ID IN AO 
MOVE® #30 ,D0 3; #SD.POINT ON DO 
3 





INFINITE TIMEOUT 
MAKE Ail STACK ABSOLUTE 


MOVE. W #4F FFF ,D3 
ADDA.L Ab, Al 











TRAP #3 
BRA.S NEXTBIT 3 SKIP OVER INTEGER TABLE, ETC. 
5 
s INTEGER TABLE 
-=PXA DC.W 10 3 iST INTEGER OF X 
-PXB DC.W 1 3; 2ND INTEGER OF X 
»-PYA DC.W 20 5 1ST INTEGER OF Y 
-PYB DC.W 1 3 “ND INTEGER OF Y 






5 
; SUBROUTINE TO NEGATE F.P.NUMBER TOS ( DELETE IF NOT NEEDED ) 
» NEGATE MOVER #314,D0 5 RI_NEG IN DO 

JSR (AS) 

RTS 











EERE EERE ERE REE ERE REE EEE EEE TEE TR OE EERIE RR 
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of the circle will depend on the size of the 
window and its scale, as well as the circle 
parameters. Using the same circle param- 
eters in different windows will, in general, 
result in different sized circles. 

The second complication is that all these 
parameters have to be entered as real or 
floating point numbers, rather than the 
integers we have used up to now. Be- 
cause the microprocessor in the QL can 
only handle integers directly, these com- 
mands have to use the Qdos arithmetic 
routines, which handle floating point 
numbers. 

Why the need for these extra complica- 
tions? Well firstly, the pixels on the QL 
screen are not square, and are in fact a 
different shape in modes 4 and 8. This 
means that, working in pixel coordinates, 
it would be rather difficult to draw, say, a 
perfect circle. If the circle was perfect in 
one mode, it would no longer be so in the 
other mode. Using graphic coordinates 
gets over this problem. Secondly, we often 
need parameters which are not whole 
numbers. For instance, to draw a semicir- 
cle with the ARC command requires an 
angle of pi radians, 3.14#. . . 

Clearly, we need to use floating point 
numbers. 


Floating points 


The graphics traps use a parameter ta- 
ble of floating point numbers, much the 
same way as, say, the BLOCKFILL com- 
mand uses a parameter table of word 
integers. So in theory we should be able to 
use the same format as before, except we 
enter floating point parameters in a float- 
ing point parameter table. If only things 
were so simple! The problem is that the 
floating point representation of numbers 

_ that the QL uses bears no obvious rela- 
tionship to the real number. Entering 
floating point numbers in a parameter ta- 
ble would be a real pain. So how do we 
overcome the problem? 

My solution is this. Each required number 
is treated as the result of the division of one 
integer by another. For instance, pi can be 
represented as 3142 and 1000. By divid- 
ing the first by the second we get 3.142, pi 
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Listing 2 


wee wews we 


LINE 


EKER EERE EERE EEE ERE EERE EEE EEE EREER ERE LEER EKEREREREEREERRERE 


"LINE ’ 


HEE ERE HERE EEE EEE EEE EEE EERE EEE EER ER EEE EEER EER EREEEER EERE 
THIS ROUTINE PLOTS A LINE IN THE WINDOW USING GRAPHICS COORDINATES. 
EACH COORDINATE IS ENTERED AS TWO INTEGERS, AND THE COORDINATE [S THE 


RESULT OF THE F.P. DIVISION 


OF THE FIRST INTEGER BY THE SECOND. 


THE PARAMETERS ARE ENTERED IN THE INTEGER TABLE. 


PUT RI STACK 50 BELOW TOP OF DATA SPACE. 


LEA.L -50(A5) ,Al ; RI STACK ON Al 
MAKE ROOM FOR iST INTEGER 
SUBQ.L #2,A1 ; INTEGER = 2 BYTES 
PUT FIRST INTEGER ON RI STACK 
MOVE. W LX1A,0{A6,A1.L) 
CONVERT TO F.P. 
MOVEQ #8, DO ; #RI_FLOAT ON DO 
MOVE. W $11C,AS 3; RI_EXEC ON AS 
JSR (AS) 
REPEAT FOR 2ND INTEGER 
SUBQ.L #2,A1 
MOVE. W LX1B,0(A6,A1.L) 
MOVE® #8 ,DO 
JSR (AS) 
NOW DIVIDE ONE F.P. NUMBER BY THE OTHER TO LEAVE X COORD ON RI STACK. 
MOVEQ #$10,D0 ; #RI_DIV ON DO 
JSR (A3) 
USE NEXT LINE IF A NEGATIVE X COORDINATE IS REQUIRED 
JSR NEGATE 


NOW REPEAT THE WHOLE THING FOR THE Y COORDINATE 


MAKE ROOM FOR 1ST INTEGER 
SUB@.L 


#2,A1 


PUT FIRST INTEGER ON RI STACK 


MOVE .W 
CONVERT TO F.P. 
MOVE®@ 
JSR 
REPEAT FOR 2ND INTEGER 
SUBQ.L 
MOVE. W 
MOVEQ 
JSR 


LY1A,0(A6,A1.L) 
#8, DO ; #RI_FLOAT ON DO 
(AS) 3 


#2,A1 
LY1B,0(A6,A1.L) 
#8, DO 

(AS) 


NOW DIVIDE ONE F.P. NUMBER BY THE OTHER TO LEAVE Y COORD ON RI STACK. 


MOVEQ 
JSR 


#$10,DO 
(AS) 


#RI_DIV ON DO 


USE NEXT LINE IF A NEGATIVE Y COORDINATE IS REQUIRED 


JSR 


NEGATE 


NOW REPEAT THE WHOLE PROCESS FOR THE COORDS OF THE SECOND POINT 


MAKE ROOM FOR iST INTEGER 


SUBQ.L #2,A1 
PUT FIRST INTEGER ON RI STACK 
MOVE. W LX2A,0(A6,A1.L) 
CONVERT TO F.P. 
MOVE® #8, DO ; #RI_FLOAT ON DO 
JSR (AS) 
REPEAT FOR 2ND INTEGER 
SUBQ.L #2,A1 
MOVE. W LX2B,0(A6,A1.L) 
MOVEQ #8, D0 
JSR ss (ANS) . | 
NOW DIVIDE ONE F.P. NUMBER BY THE OTHER TO LEAVE X COORD ON RI STACK. 
MOVEG #$10,D0 }; #RI_DIV ON DO 
JSR (A3) 
USE NEXT LINE IF A NEGATIVE X COORDINATE IS REQUIRED 
JSR NEGATE 


NOW REPEAT THE WHOLE THING FOR THE Y COORDINATE 


MAKE ROOM FOR 1ST INTEGER 
SUBQ.L 


#2,A1 


PUT FIRST INTEGER ON RI STACK 


MOVE. W 
CONVERT TO F.P. 
MOVEG 
JSR 
REPEAT FOR 2ND INTEGER 
SUBQ.L 
MOVE .W 
MOVER 
JSR 


LY2A,0(A6,A1.L) 


#8 ,DO 
(AB) 


; #RI_FLOAT ON DO 


#2,A1 
LY2B,0(A6,A1.L) 
#8 , DO 

(AS) 


NOW DIVIDE ONE F.P. NUMBER BY THE OTHER TO LEAVE Y COORD ON RI STACK. 


MOVE® 
JSR 

USE NEXT LINE IF A NEGATIVE 
JSR 


NOW PLOT THE LINE 
MOVE.L 


MOVE® 
MOVE .W 
ADDA.L 
TRAP 

BRA.S 


#$10,DO 3 #RI_DIV ON DO 


{A3) 

Y COORDINATE IS REQUIRED 

NEGATE 

(A7) ,AO OR 4(A7),AO OR 8(A7),AO ETC. 


CONSOLE CHANNEL ID IN AO 


3 

3 
#431,D0 3; #SD.LINE ON DO 
#$FFFF,D3 ; INFINITE TIMEOUT 
AS, AL ; MAKE Al STACK ABSOLUTE 
#3 
NEXTBIT 3 


SKIP OVER INTEGER TABLE, ETC. y 
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correct to three decimal places. To get pi 
on my floating point table, | do the follow- 
ing: 

1. Enter 3142 and 1000 as two word 
integers in an integer table. 

2. Use the QL arithmetic package to 
convert them into floating point numbers. 

3. Use the QL arithmetic package to 
divide one by the other to give 3.142. 

4. Arrange that when this has been done, 
the resulting floating point number is in the 
correct place in the required floating point 
parameter table. 


Negative parameters 


One further complication: we may need 
our floating point parameter to be nega- 
tive. The obvious way to deal with this 
would be to make the first integer negative. 
Making the first integer -3142 and the 
second 1000 would give us minus pi. 
Unfortunately, it doesn't work. To be pre- 
cise, it seems to work when the required 
parameter is a negative angle, but not if it 
is a negative x or y coordinate. Why this 
should be so is acomplete mystery to me. 
When | assemble the code and trace it in 
single steps, it always works; if | SEXEC 
the code and then EXEC the program, it 
always crashes. Perhaps | have missed 
something. If you can see what is wrong 
perhaps you can let me know. On the 
other hand, perhaps I've found a Qdos 
bug. | wonder... 

Anyway, there is another solution which 
does seem to work. All we do is use 
positive integers, and then use the arith- 
metic package to negate the floating point 
number. 

The QL arithmetic package does a great 
deal which we do not really want to con- 
sider at this stage. This will be the subject 
of alater part when we look at dealing with 
all the various arithmetical processes it 
can do. For the moment we shall limit 
ourselves to what is necessary to handle 
the graphics traps. 

Execution of an arithmetic operation is a 
‘vectored utility’. The vector $11C is put 
into an address register, say A3. This 
vector contains the address of the subrou- 
tine, so aJSR (A3) will jump to the routine. 
For the routine to work properly, other 
registers must have the correct setting 
beforehand. 


Execution 


Register DO requires a word to say which 
arithmetic operation is to be executed. For 
instance, #$10 in DO will cause a divide. 
The floating point number on top of the 
stack will divide into the next floating point 
number on stack. The floating point result 
will be left on the stack in place of the two 
Original numbers. However, this is not the 
normal stack but a special one. More 
about this in a moment. 

Register A4 should point to the base of 
the data area. We don't need to do any- 


4a. 


3 
3; INTEGER TABLE 
»~LX1A 
»LX1iB 
-LYiA 
»-LY1B 
»LX2A 
»~LX2B 
»LY2A 
-LY2B 


INTEGER 
INTEGER 
INTEGER 
INTEGER 
INTEGER 
INTEGER 
INTEGER 
INTEGER 
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SUBROUTINE TO NEGATE THE F.P. NUMBER TOS 


- NEGATE MOVE® 


#$14,DO 3; RI_NEG IN DO 


KHEEEERKKEKELEREKEKEEREEEEE EKER EEEE KEE EERE EKEKEEERKKEKKEKEEKREKEKEEKEEKERE 





thing about this because when we EXEC 
a program, the base address of the data 


area automatically goes into A4. 


Listing 3 


ARC LEA.L 


SUBA.L 


MOVE.W : 
CONVERT TO F.P. 


MOVER 
MOVE .W 
JSR 

5; REPEAT FOR 2ND INTEGER 
SUB. L 
MOVE.W 
MOVER 
JSR 


MOVE® 
JSR 


“ap we 


JSR 


MAKE ROOM FOR 1ST INTEGER 


Register A1 needs to point to the special 
stack needed for the arithmetic data, usu- 
ally called the RI stack. We have to decide 


EEHEEEE REKEREKE GHEE REBEL RE EERE REE EHR KEK ERE E RHEE ERE EHR RK RERRE 


"ARC * 


EREEKERKKEKEE KE LEE RRR EERE ERE KEKE HR HRREREH EERE EEK EERE EE EER EEK EK EREREEREER 
THIS ROUTINE PLOTS AN ARC IN THE WINDOW USING GRAPHICS COORDINATES. 

THE SD.ARC TRAP REQUIRES 5 PARAMETERS, THE X AND Y COORDINATES OF THE 
ENDS OF THE ARC, AND THE ANGLE (IN RADIANS) SUBTENDED BY THE ARC. 

EACH PARAMETER 1S ENTERED AS TWO INTEGERS, AND THE RESULT OF THE F.P. 
DIVISION OF THE FIRST INTEGER BY THE SECOND GIVES THE REQUIRED 
PARAMETER (COORDINATE OR ANGLE). 

THE 10 INTEGERS ARE ENTERED IN THE INTEGER TABLE 


PUT RI STACK SO BELOW TOP OF DATA SPACE. 


—S0 (AS) ,Al s; RI STACK ON Ai 


#2,A1 ; INTEGER = 2 BYTES 


PUT FIRST INTEGER ON RI STACK 


AX1A,0(A6,A1.L) 


#8, DO ; #RI_FLOAT ON DO 
$11C,A3 +; RI_EXEC ON AS 
(AS) 


#2,A1 
AX1B,0(A6,A1.L) 
#8,D0 

(AB) 


NOW DIVIDE ONE F.P. NUMBER BY THE QTHER TO LEAVE X COORD ON RI STACK. 


#$10,DO0 3 #RI_DIV ON DO 
(AS) 


USE NEXT LINE IF A NEGATIVE X COORDINATE IS REQUIRED 


NEGATE 


NOW REPEAT THE WHOLE THING FOR THE Y COORDINATE 
MAKE ROOM FOR 1ST INTEGER 


SUBQ.L #2,A1 
; PUT FIRST INTEGER ON RI STACK 
MOVE. W AY1A,0(A6,A1.L) 
3; CONVERT TO F.P. 
MOVE® #8, DO ; #RI_FLOAT ON DO 
JSR (AS) 
; REPEAT FOR 2ND INTEGER 
SURQ.L #2,A1 
MOVE. W AY1B,0{(A6,A1.L) 
MOVEQ #8, D0 
JSR (A3) 
3; NOW DIVIDE ONE F.P. NUMBER BY THE OTHER TO LEAVE Y COORD ON RI STACK. 
MOVEQ #$10,DO  ; #RI_DIV ON DO 
JSR (AZ) 


“ae we 


JSR 


USE NEXT LINE IF A NEGATIVE Y COORDINATE IS REQUIRED 


NEGATE 


NOW REPEAT THE WHOLE PROCESS FOR THE COORDS OF THE SECOND POINT 
MAKE ROOM FOR 1ST INTEGER 


SUBQ.L #2,A1 
3; PUT FIRST INTEGER ON RI STACK 
MOVE. W AX2A,0(A6,A1.L) 
3; CONVERT TO F.P. 
MOVEG #8, DO ; #RI_FLOAT ON DO 
JSR (AS) 
3; REPEAT FOR 2ND INTEGER 
SUBQ.L #2,A1 
MOVE. W AX2B,0(A6,A1.L) 
MOVEG #8, DO 
JSR (AS) 
3; NOW DIVIDE ONE F.P. NUMBER BY THE OTHER 10 LEAVE X COORD ON RI STACK. 
MOVEQ #$10,DO0  ; #RI_DIV ON DO 
JSR (AS) 
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where to put it. Clearly it has to go some- 
where in the program's data area. Register 
A4 points to the bottom of this area auto- 
matically, as we have already said. The top 
of the data area automatically goes in 
register A5 when we EXEC aprogram. Our 
RI stack must go somewhere between the 
two. In fact the top of the data area (in A5) 
is also the top of the normal stack for the 
program, so we need to leave enough 
space below that for that stack. However, 
if we go too far down towards the address 
held in A4, we may interfere with other 
uses of the data area. It appears that 50 
bytes is more than enough space for the 
normal stack, so if we put the top of the RI 
stack at 50 bytes below the address in A5, 
that should leave enough normal stack 


JSR NEGATE 


we weowe we we 


MAKE ROOM FOR 1ST INTEGER 


SUBQ.L #2,A1 
; PUT FIRST INTEGER ON RI STACK 
OVE.W 
; CONVERT TO F.P. 
MOVEQ #8 ,DO 
JSR (AS) 
; REPEAT FOR 2ND INTEGER 
SUBQ.L #2,A1 
MOVE. W 
MOVED #8 ,DO 
JSR (AS) 
3 
MOVEQ #$10,DO 
JSR (AZ) 


JSR NEGATE 


MAKE ROOM FOR 1ST INTEGER 
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space. 

The only problem then is to make sure the 
data space left is big enough for the RI 
stack plus any other call that may be made 
on data space. The graphics calls we shall 
make apparently need atleast 240 bytes of 
RI stack, which makes 50 + 240 = 290 
bytes for the two stacks. Leave about the 
same again for other use of data space and 
that means we need about 500 bytes at 
least for data space. 

The question of how much data space a 
program needs is very difficult to analyse 
without a very detailed knowledge of ex- 
actly what Qdos is doing. The best policy is 
‘suck it and see’. In other words, start off 
with a big data space. (Assembler Work- 
bench, which | use, defaults to a data 


USE NEXT LINE IF A NEGATIVE X COORDINATE IS REQUIRED 


NOW REPEAT THE WHOLE THING FOR THE Y COORDINATE 


AY2ZA,0(A6,A1.L) 


3; #RI_FLOAT ON DO 


AY2B,0(A6,A1.L) 


NOW DIVIDE ONE F.P. NUMBER BY THE OTHER TO LEAVE Y COORD ON RI STACK. 


; #RI_DIV ON DO 


USE NEXT LINE IF A NEGATIVE Y COORDINATE IS REQUIRED 


NOW REPEAT THE WHOLE THING FOR THE ANGLE 


ANGLEA,O(AG,A1L.L) 


3; #RI_FLOAT ON DO 


ANGLEB,O(A6,A1.L) 


NOW DIVIDE ONE F.P. NUMBER BY THE OTHER TO LEAVE ANGLE ON RI STACK. 


; #RI_DIV ON DO 


3; OR 4(A7),AO OR 8(A7),AO ETC. 
3; CONSOLE CHANNEE ID IN AO 

; #SD.ARC ON DO 

; INFINITE TIMEQUT 

; MAKE Ai STACK ABSOLUTE 


; SKIP OVER INTEGER TABLE, ETC. 


iST INTEGER 
INTEGER 
INTEGER 
INTEGER 
INTEGER 
INTEGER 
INTEGER 


INTEGER 
INTEGER 


OF Xi 
OF X1 
OF 
OF 
OF 
OF 
OF 


OF 
OF 


2ND 
isT 
2ND 
iST 


1ST 


2ND 
1ST 


SUBQ.L #2,A1 
3; PUT FIRST INTEGER ON RI STACK 
MOVE. W 
; CONVERT TO F.P. 
MOVER #8 ,DO 
JSR (AB) 
; REPEAT FOR 2ND INTEGER 
SUBR.L #2,A1 
MOVE. W 
MOVEQ #8, D0 
JSR (AS) 
5 
MOVEQ #$10,D0 
JSR (AS) 
; USE NEXT LINE IF @ NEGATIVE ANGLE IS REQUIRED 
pty ) JSR NEGATE 
3 
; NOW PLOT THE ARC 
MOVE. L (A7) ,AO 
MOVEQ ##52,D0 
MOVE. W #$FFFF,D3 ; 
ADDA.L Ab, AL 
TRAP #3 
BRA.S NEXTBIT 
5 
; INTEGER TABLE 
~AX1A pc.W 10 
.AX1B DC.W i 
-AYIA DC.W 20 
-AY1B DC.W i 
~AX2A Dc.W 100 
.AX2B DC.W 1 
.AY2A DC.W 50 
. AY2B DC.W i 
. ANGLEA DC.W 3142 
. ANGLEB DC.W 1000 


3 
5 
5 
5 
5 
3 2ND 
5 
& 
3 
3 


2ND INTEGER OF 


5 
3; SUBROUTINE TO NEGATE THE F.P. NUMBER TOS 


3 
.« NEGATE MOVEG 
JSR 


RTS 


#414,D0 
(AS) 


; RI_NEG IN DO 


5 
2 HHH IH HEHEHE RHEE HEE HEHEHE EEE EEE KEKE EKER ERE EHE KEE EEKEKHKEE EE EREREEEE 
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space of 4K for SEXEC commands, and 
that is bigger than | have ever needed.) If 
everything works OK and if you feel you 
may need the unused space, you can 
experiment with smaller data spaces until 
you find the smallest that seems to work. 

The only other point we need to make is 
about register D7. Apparently this should 
be set to 0 in Qdos versions 1.03 and 
earlier, so if you have a very old QL you 
may need to bear it in mind. However, | 
shall ignore it. 


Reverse order 


This is all (and | think it's quite enough 
for now!) we need to concern ourselves 
with about arithmetic operations. We now 
need to consider the matter of using the 
arithmetic package to turn our initial in- 
teger table into the floating point table 
that the graphics traps require. This is 
done by obeying a simple rule. We carry 
out our arithmetic operations to put items 
on the stack in the reverse order. This 
means the last parameter we add, which 
is the first one we need, will be at the top 
of the stack and also, therefore, at the top 
of the parameter. 

There is one last complication which 
needs to be dealt with before we can look 
at the listings. | said earlier that register 
A4 points to the base of the data space, 
and register A5 to the top of the data 
space. This is not strictly true. What ac- 
tually happens is this: register A6 points 
to the base of the job (ie the program 
area). Registers A4 and Ad contain offsets 
from this to point to the bottom and top of 
the data space. So to get the true ad- 
dresses of the bottom and top of the data 
space, we need to add the address in A6 
to A4 and A5. Since our RI stack was 
obtained by subtracting a number from 
register A5 and putting it in register A1, 
then clearly we need to add the address 
in A6 to get the true address of our RI 
stack. 


Adding addresses 


Up to this point, this fact has been of no 


real consequence. But now we are going 


to put data onto the RI stack, ready to be 
used by the arithmetic package, so we 
need a command which takes the offset 
into account. Instead of using the com- 
mand: 


MOVE.W DATA,A1 


which we might have expected, we must 
use: 


MOVE.W DATA,0 (A6,A1.L) 


which will add the address in A6 to the 
offset in A1 to find the correct address. 
Furthermore, when we make our graphics 
trap call, the trap needs the true address in 
A1, not the offset. So before making the 
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trap call, we must add the address in A6 to 
it, with the command: 


ADDA.L A6,A1 


There is an alternative to this, by the way. 
It is to make a TRAP 4 call just before the 
TRAP 3. TRAP 4 has no parameters and 
no error returns. | don't use it because it 
does something slightly different when 
preceding a TRAP 2 call anda TRAP 3 call 
and | like, as far as possible, the code to 
say exactly what it is doing. 


Look at listings 


Now to look at the listings. As with all the 
previous screen handling traps, AO must 
hold the channel ID, and D3 must hold the 
timeout. As this is the same for all the 
listings, we shall not mention it again. We 
shall look at the first listing in detail, and 
skip over the same points as they are 
repeated in the other listings. 

POINT (Listing one) will plot a point in 
the window using graphics coordinates. 
The SD_POINT trap requires the Y coordi- 
nate (floating point) on the top of the RI 
stack, and the x coordinate (floating point) 
next. We are going to calculate these from 
two word integers in an integer table, so the 
table requires two word integers for the x 
coordinates and two for the y coordinates 
of the point, making four integers in all. 

First we load the address offset for our RI 
stack in Al. 

Next we deal with the x coordinate. (Re- 
member, we do them in reverse order.) 

We want to add the first integer to the RI 
stack. When the arithmetic package uses 
the RI stack it automatically adjusts the 
stacker pointer as numbers are added or 
removed. But if we are going to simply use 
a command to put data in an address, we 
must move the RI stack pointer ourselves. 
So first we subtract 2 from the RI stack 
pointer to make room for the integer, be- 
fore moving the first integer onto the Rl 
stack. Then we call the arithmetic package 
to convert it to floating point. We now 
repeat this for the second integer (ie move 
the RI stack pointer, move the next integer 
onto the RI stack, and convert to floating 
point). 


Negative line 


The RI stack now holds an FP version of 
the second integer on top and an FP ver- 
sion of the first integer below. So we use 
the arithmetic package to divide one by the 
other, to leave an FP version of the x 
coordinate on the RI stack. If we need a 
negative x coordinate, we use the next line 
to jump to a subroutine to get the arithmetic 
package to make it negative. (This line 
appears in all the listings wherever a pa- 
rameter might need to be negative — which 
is most of them! So we shall not mention 
this again.) 

lf we repeat this whole process for they 
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Listing 4 


3 
3 
3 
3 
3 
5 
5 
3 
3 
3 
3 
: 
5 


=e we “6 we we we “se 


KKH H EEK LK HERE RHEE IEEE HEHE EE EINE EE HEE ERE EEE EEE EERE EEE EERE 
ELLIPSE’ 

HERE EHH IE EEK IEEE EE EEE EHH HELE HHH HEHE RHEE RHEE EEE EER ERE RHEE REESE 

THIS ROUTINE PLOTS AN ELLIPSE IN THE WINDOW USING GRAPHICS COORDINATES. 


THE SD.ELIPS TRAP REQUIRES 5 F.P. PARAMETERS, THE X AND Y COORDINATES 
OF THE CENTRE, THE ECCENTRICITY, THE RADIUS, AND THE ROTATION ANGLE. 


EACH PARAMETER IS ENTERED AS TWO INTEGERS, 


AND THE PARAMETER IS THE 


RESULT OF THE F.P. DIVISION OF THE FIRST INTEGER BY THE SECOND. 
THE 10 INTEGERS ARE ENTERED IN THE INTEGER TABLE. 


PUT RI STACK 50 BELOW TOP OF DATA SPACE. 


ELLIPSE LEA.L -50(A5) ,Al ; RI STACK ON Al 
MAKE ROOM FOR 1ST INTEGER 
SUBQ.L #2,A1 


PUT FIRST INTEGER ON RI STACK 


MOVE. W EXA,0(A6,A1.L) 

CONVERT TO F.P. 
MOVEQ #8, DO ; #RI_FLOAT ON DO 
MOVE. W $11C,A3 3 RI_EXEC ON AZ 
JSR (AS) 

REPEAT FOR 2ND INTEGER 
SUBQE.L #2,A1 
MOVE. W EXB,0(A6,AL.L) 
MOVEQ #8, DO 
JSR (AS) 

NOW DIVIDE ONE F.P. NUMBER BY THE OTHER TO LEAVE X COORD ON RI STACK. 
MOVEQ #$10,D0 3; #RI_DIV ON DO 
JSR (AS) 


USE NEXT LINE IF A NEGATIVE X COORDINATE IS REQUIRED 


JSR 


NEGATE 


NOW REPEAT THE WHOLE THING FOR THE Y COORDINATE 


MAKE ROOM FOR 1ST INTEGER 


SUBA.L 


#2,A1 


PUT FIRST INTEGER ON RI STACK 


MOVE. W EYA,0(AG,4A1.L) 

CONVERT TO F.P. 
MOVE® #8 ,DO ; #RI_FLOAT ON DO 
JSR (AS) 

REPEAT FOR 2ND INTEGER 
SUBG.L #2,A1 
MOVE.W EYB,0(AG,A1.L) 
MOVEQ #8 ,DO 
JSR (AS) 

NOW DIVIDE ONE F.P. NUMBER BY THE OTHER TO LEAVE Y COORD ON RI STACK. 


MOVE®Q 
JSR 


#$10,DO 3 
(AZ) 


#RI_DIV ON DO 


USE NEXT LINE IF A NEGATIVE Y COORDINATE IS REQUIRED 


JSR 


NEGATE 


NOW REPEAT THE WHOLE THING FOR THE ECCENTRICITY 


MAKE ROOM FOR 1ST INTEGER 


SUBQ.L 


#2,A1 


PUT FIRST INTEGER ON RI STACK 


MOVE. W ECCA,0(A6,A1.L) 
CONVERT TO F.P. 
MOVE® #8, DO 3; #RI_FLOAT ON DO 
JSR {A3) 
REPEAT FOR 2ND INTEGER 
SUBQ.L #2,A1 
MOVE. W ECCB,0(A6,A1.L) 
MOVE® #8, DO 
JSR (AS) 
NOW DIVIDE ONE F.P. NUMBER BY THE OTHER TO LEAVE ECCEN. ON RI STACK. 
MOVEQ #$10,DO 3; #RI_DIV ON DO 
JSR (AZ) 


NOW REPEAT THE WHOLE THING FOR THE RADIUS 


MAKE ROOM FOR 1ST INTEGER 


SUBQ.L 


#2,A1 


PUT FIRST INTEGER ON RI STACK 


MOVE. W RADIUSA,O{A6,A1.L) 
CONVERT TO F.P. 
MOVED #8, DO 5 #RI_FLOAT ON DO 
JSR {A3) 
REPEAT FOR 2ND INTEGER 
SUBA.L #2,A1 
MOVE. W RADIUSB,0(A6,A1.L) 
MOVEQ #8, DO 
JSR (AS) 
NOW DIVIDE ONE F.P. NUMBER BY THE OTHER TO LEAVE RADIUS ON RI STACK. 


MOVE® 
JSR 


#$10,DO0 3; 
(AS) 


#RI_DIV ON DO 


NOW REPEAT THE WHOLE THING FOR THE ANGLE OF ROTATION 


MAKE ROOM FOR 1ST INTEGER 


SUBR.L 


#2,A1 


PUT FIRST INTEGER ON RI STACK 


MOVE. W ROTA,0(A6,A1.L) 

CONVERT TO F.P. 
MOVE@ #8 ,DO ; #RI_FLOAT ON DO ., 
JSR (AS) 


> 
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REPEAT FOR 2ND INTEGER 
SUB@.L 
MOVE. W 
MOVE® 
JSR 


#2,A1 


#8,D0 
(A3) 
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ROTB,O(AS,A1.L) 


NOW DIVIDE ONE F.P. NUMBER BY THE OTHER TO LEAVE ROTATION ON RI STACK. 


MOVEG 
JSR 

USE NEXT LINE IF A NEGATIVE 
JSR 


(AS) 
NEGATE 


s; NOW PLOT THE ELLIPSE 
MOVE.L {A7) ,AO 
MOVEQ 
MOVE. W 
ADDA.L 
TRAP 
BRA.S 


#$33,D0 


Aé, Al 
#3 
NEXTBIT 


INTEGER TABLE 

DC.W 10 
DC.W 1 
DC.W 20 
DC.W 1 
DC.W 2 
DC.W 1 
DC.W 20 
DC.W 1 
DC.W 3142 
DC.W 4000 


»ECCA 
- ECCB 
- RADIUSA 
»RADIUSB 
-ROTA 
-ROTB 


#410,D0 


#$F FFF ,DS 


; #RI_DIV ON DO 


ANGLE IS REQUIRED 


OR 4(A7),A0 OR 8{(A7),AO ETC. 
CONSOLE CHANNEL ID IN AO 
#SD.ELIPS ON DO 

INFINITE TIMEOUT 

MAKE Ai STACK ABSOLUTE 


“a5 we “S we Me 


SKIP OVER INTEGER TABLE, ETC. 


aa 


1ST 
2ND 
iST 
2ND 
iST 
2ND 
isT 
2ND 
1ST 
2ND 


INTEGER 
INTEGER 
INTEGER 
INTEGER 
INTEGER 
INTEGER 
INTEGER 
INTEGER 
INTEGER 
INTEGER 


CENTRE X 
CENTRE X 
CENTRE Y 
CENTRE Y 
ECCENTRICITY 
ECCENTRICITY 
RADIUS 
RADIUS 
ROTATION 
ROTATION 


=e ‘ae 


we ee wee ee we wen ae 


5; SUBROUTINE TO NEGATE THE F.P. NUMBER TOS 


3 
« NEGATE MOVEGQ 


(AS) 


#$14,D0 


; RI_NEG IN DO 


3 , 
S RHE KHAEHRKKAE REET KE KKKER EK EERE ERE ERE EEE RE KERERREEREEREEERERER KEE 


coordinate, we shall finish up with the FP 
version of the y coordinate on top of the RI 
stack, and the FP version of the x coordi- 
nate below it, which is precisely what is 
required for the SD_ POINT trap. 


True stack pointer 


So to the final steps. We move $30 into 
DO for the SD_ POINT trap call. We add the 
address in A6 to A1 to get the true RI stack 
pointer in A1, and then make the TRAP 3 
call. All being well, the point will now be 
plotted. Finally, we branch to the next bit of 
code to skip over the integer table and 
NEGATE subroutine (if it hasn't been de- 
leted because it was not needed. 

LINE (Listing two) will plot a line in the 
window using the graphics coordinates. 
SD_LINE requires four floating point pa- 
rameters on the RI stack, as follows, start- 
ing from the top of the stack: 


y coordinate of the end of the line 
x coordinate of the end of the line 
y coordinate of the start of the line 
x coordinate of the start of the line 


As these FP numbers are going to be 
calculated from two integers each, we need 
an integer table with eight-word integers 
on it. 

First we load the address offset for our RI 
stack into A1. 

Next we process the integers into FP 
numbers, in exactly the same way as in 
POINT. Again, we do them in reverse or- 
der, to get the four FP parameters on the RI 
stack. 
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Finally we put $31 in DO, correct the RI 
stack pointer in A1 and make the trap call 
to plot the line, before branching to the next 
bit. 

ARC (Listing three) plots an arc in the 
window using graphics coordinates. 


Listing 3 


‘ae ‘3s “ase 


I.E. THE LENGTH OF THE Y AXIS. 


SCALE LEA.L 


FIX THE HEIGHT OF 
MAKE ROOM FOR 1ST 


THE WINDOW 
INTEGER 
SUBR.L #2,A1 
ON RI STACK 
MOVE. W 


we owe we 6 «wh we es ee fe fe A ee 


PUT FIRST INTEGER 


CONVERT TO F.P. 


MOVE 
MOVE .W 
JSR 


; REPEAT FOR 2ND INTEGER 
SUB. L 
MOVE .W 
MOVES 
JSR 


#8,D0 
#11C,A3 
(AS) 


#2,A1 


#8, DO 
{A3) 


SD_ARC requires five FP parameters on 
the RI stack, as follows, starting with the 
top of the RI stack. 


angle (in radians) subtended by the arc 
y coordinate of the end of the arc 
x coordinate of the end of the arc 
y coordinate of the start of the arc 
x coordinate of the start of the arc 


With two integers for each FP number, 
the integer table contains 10 integers. 

As with POINT and LINE, they are proc- 
essed in reverse order to get the five FP 
parameters on the RI stack in the correct 
order. 


Trap call 


Finally we make the trap call as before, 
this time with $32 in DO for SD. ARC trap 
Call. 

ELLIPSE (Listing four) plots an ellipse 
or circle in the window using graphics co- 
ordinates. SD_ELIPS requires five FP pa- 
rameters onthe RI stack, as follows, starting 
with the top of the RI stack: 


rotation angle (in radians) of the major axis 
(this is ignored if a circle is plotted) 
radius of the ellipse (length of the minor 
axis) 

eccentricity of the ellipse (ratio major/mi- 
nor axes. (This is 1 for a circle.)) 

y coordinate of the centre 

x coordinate of the centre 


KEK EERE RHEE HERE EEE HEE EE EE EEE EKER REE EEE KER EERE EE EERE EREER EHR EN 
‘SCALE * 

HEE HK EKER EH EE RHE EEE EEE EERE REE EK ERE IE EEE EEE REE EEE EEE EEE LEER EERE RER 

THIS ROUTINE SETS THE SCALE AND ORIGIN FOR GRAPHICS COORDINATES 

THE SD.SCALE TRAP REQUIRES 3 F.P. PARAMETERS, THE X AND Y COORDINATES 

OF THE BOTTOM LEFT CORNER OF THE WINDOW AND THE HEIGHT OF THE WINDOW 


EACH PARAMETER IS ENTERED AS TWO INTEGERS, AND THE PARAMETER [5 THE 
RESULT OF THE F.P. DIVISION OF THE FIRST INTEGER BY THE SECOND. 
THE & INTEGERS ARE ENTERED IN THE INTEGER TABLE 


PUT RI STACK 5O BELOW TOP OF DATA SPACE. 
—50 (AS) ,Al 


Ri STACK ON Al 


; INTEGER 


HEIGHTA,0(A6,A1.L) 


; #RI_FLOAT ON DO 
; RI_EXEC ON AS 


HEIGHTB,O(A6,A1.L) 


NOW DIVIDE ONE F.P. NUMBER BY THE OTHER TO LEAVE HEIGHT ON RI STACK. 


MOVED 


JSR {AB) 


3; NEXT FIX THE ORIGIN 
MAKE ROOM FOR iST INTEGER 
SUB. L 
PUT FIRST INTEGER ON RI STACK 


#2,A1 


MOVE.W 
CONVERT TO F.P. 

MOVEQ 

JSR 


#8, DO 
{A3) 





#$10,D0 


; #RI_DIV ON DO 


SXA,0(A6,A1.L) 


3; #RI_FLOAT ON DO 
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REPEAT FOR 2ND INTEGER 
SUB@.L 
MOVE. W 
MOVED 
JSR (AS) 

NOW DIVIDE ONE F.P. NUMBER BY THE OTHER TO LEAVE X COORD ON RI STACK. 
MOVEQ #$10,D0 ; #RI_DIV ON DO 
JSR {A3) 

3; USE NEXT LINE IF A NEGATIVE X COORDINATE IS REQUIRED 

JSR NEGATE 


the integer table contains six integers. 

As with the other listings, they are proc- 
essed in reverse order to get the three FP 
parameters on the RI stack in the correct 
order. 

Finally we make the trap call as before, 
this time with $34 in DO for SD_SCALE trap 
call. 


#2,A1 
SXB,0(A6,A1.L) 
#8 , DO 


; NOW REPEAT THE WHOLE THING FOR THE Y COORDINATE 
; MAKE ROOM FOR 18ST INTEGER 
SUBQ.L #2,A1 
PUT FIRST INTEGER ON RI STACK 
MOVE.W SYA,O(A6,A1.L) 


Pixels take a fix 


GCURSOR (Listing six) is slightly dif- 
ferent in format from the others. It sets the 
position of the cursor in the window using 
a combination of graphics coordinates, 
and pixel coordinates. It works like this: a 
pair of graphics coordinates fixes a pointin 
the window. (Remember, the graphics 
origin may not even be on the screen.) 
Then, having fixed this point, a pair of 
pixels offsets from this point will set the 
position of the cursor. SD_GCUR requires 
four FP parameters on the RI stack, as 
follows, starting with the top of the RI stack. 


CONVERT TO F.P. 
MOVEQ 
JSR 
REPEAT FOR 2ND INTEGER 
SUBQ.L 
MOVE. wW 


MOVE® 
JSR 
NOW DIVIDE ONE F.P. 
MOVEG #$10,D0 
JSR (AS) 
USE NEXT LINE IF A NEGATIVE Y COORDINATE IS REQUIRED 
JSR NEGATE 


#8 , DO 
(AS) 


; #RI_FLOAT ON DO 


#2,A1 

SYB,0(A&,A1.L) 

#8, D0 

(A3) 

NUMBER BY THE OTHER TO LEAVE Y COORD ON RI STACK. 
3; #RI_DIV ON DO 


AND ORIGIN 


NOW SET THE SCALE 
MOVE.L 


(A7) ,AD OR 4(A7),A90 OR 8(A7),AO ETC. 
CONSOLE CHANNEL ID IN AO 
#SD.SCALE ON DO 

INFINITE TIMEOUT 


; MAKE Al STACK ABSOLUTE 


MOVEQ #$34,DO 
MOVE . W #3$FFFF ,DS 
ADDA.L Ab, Al 
TRAP #3 


BRA.S NEXTBIT 


x coordinate to be fixed in the window 
y coordinate to be fixed in the window 
pixel offset to the right of the fixed point 
pixel offset below the fixed point 


SKIP OVER INTEGER TABLE, ETC 


Ld 

3; INTEGER TABLE 
» HEIGHTA 

. HEIGHTB 

-SXA 

.5XB 

. SYA 

.SYB 


DC.W 500 
DC.W 1 
DC.W 10 
DC.W 1 
DC.W 20 
DC.W 1 


iST 
2ND 
iST 
2ND 
15ST 
2ND 


INTEGER OF HEIGHT 
INTEGER OF HEIGHT 
INTEGER OF X 
INTEGER OF X 
INTEGER OF Y 
INTEGER OF Y 


Now pixel offsets will clearly be integers 
(you can't move 25.63 pixels!) so although 
they are in FP format, they can each be 
obtained by simply converting one integer 
into FP format. 

With two integers for each FP graphics 
coordinate, and one integer for each pixel 
offset, the integer table contains six inte- 
gers. 

As with the other listings, they are proc- 


SUBROUTINE TO NEGATE THE F.P. NUMBER TOS 
« NEGATE MOVE@ 
JSR 
RTS 


#$14,D0 -; 
(AS) 


RI_NEG IN DO 
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With two integers for each FP number, 
the integer table contains 10 integers. — 

As with POINT, LINE and ARC, they are 
processed in reverse order to get the five 
FP parameters on the RI stack in the cor- 
rect order. 


Listing 4 


HEHEHE RR EKER ERIE IER TRIE IE TEE EEE EEE ETE TE IEE ETE TE TEE EEE EE HEHEHE EE EH EHH EE EHH 
‘GCURSOR * 

HHH K HERE KEE RRR RERIEEEEERE EHE LEEIEEELEEHEEERHEIEHEEEEHEEREREERREERRE EE 

THIS ROUTINE SETS THE GRAPHICS CURSOR POSITION. 

THE SD.GCUR TRAP REQUIRES 4 F.P. PARAMETERS, X AND Y COORDINATES OF A 

POINT IN THE WINDOW, AND THE RIGHT AND DOWN PIXEL OFFSETS OF THE CURSOR 


wwe “wa “ES we 


Finally we make the trap call as before, 
this time with $33 in DO for SD_ELIPS trap 
Call. 


Coordinate change 


SCALE (Listing five) will alter the 
graphic coordinates of the bottom left cor- 
ner of the window, and also the graphics 
units for the height of the window. By 
default, these are set to (0,0) and 100 
respectively when the window is first 
opened. SD_SCALE requires three FP 
parameters on the RI stack, as follows, 
Starting with the top of the RI stack. 


y coordinate of the bottom of the window 
x coordinate of the left hand edge of the 
window 

length of the y axis 


With two integers for each FP number, 
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FROM THIS POINT. 

THE PIXEL OFFSETS ARE ENTERED AS ONE INTEGER EACH. 

EACH COORDINATE IS ENTERED AS TWO INTEGERS, AND THE COORDINATE IS THE 
RESULT OF THE F.P. DIVISION OF THE FIRST INTEGER BY THE SECOND. 

THE 6 INTEGERS ARE ENTERED IN THE INTEGER TABLE. 


PUT RI STACK 50 BELOW TOP OF DATA SPACE. 

LEA.L ~SO (AS) ,Al 3; RI STACK ON Al 
FIX PIXEL OFFSET DOWNWARDS 
MAKE ROOM FOR INTEGER 
SUBQ.L 
STACK. 
MOVE. W 


#2,A1 


PUT INTEGER ON RI 
DOWN, O(AS,A1.L) 
CONVERT TO F.P. 
MOVES #8,DO : 
MOVE. W $11C,AS ore 
JSR (AS) 
USE NEXT LINE IF A NEGATIVE (UP) OFFSET 
JSR NEGATE 


#RI_FLOAT ON DO 
RI_EXEC ON AS 


IS REQUIRED 


NEXT FIX PIXEL OFFSET TO THE RIGHT 
MAKE ROOM FOR INTEGER 
SUBQ.L 
PUT INTEGER ON RI STACK 
MOVE .W RIGHT ,O(A6,AL.L) 
CONVERT TO F.P. 
MOVEQ 
JSR 


#8, DO 
(AZ) 
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USE NEXT LINE IF A NEGATIVE 
JSR 


NEXT FIX THE COORDINATES 
MAKE ROOM FOR 1ST INTEGER 
SUBG.L 


MOVE .W 
CONVERT TO F.FP. 


we 


MOVEQ 
JSR 

REPEAT FOR 2ND INTEGER 
SUBQ.L 
MOVE. W 
MOVED 
JSR 

NOW DIVIDE ONE F.P. 
MOVER 
JSR 

USE NEXT LINE IF A NEGATIVE 
JSR 


MACHINE CODE PROGRAMMING 


{LEFT) OFFSET IS REQUIRED 
NEGATE 


#2,A1 


PUT FIRST INTEGER ON RI STACK 


BYA,0(AS,A1.L) 


#8, DO 
(AS) 


#2,A1 
GYB,0(A6,A1.L) 
#8,D0 

(AS) 


NUMBER BY THE OTHER TO LEAVE X COORD ON RI STACK. 


#$10,D0 
(AZ) 

Y COORDINATE IS REQUIRED 
NEGATE 


; #RI_DIV ON DO 


NOW REPEAT THE WHOLE THING FOR THE X COORDINATE 


MAKE ROOM FOR 1ST INTEGER 
SUBA.L 


#2,A1 


; PUT FIRST INTEGER ON RI STACK 
GXA,O(AG,AI.L) 


. MOVE.W 


CONVERT TO F.F. 
MOVEQ 
JSR 

REPEAT FOR 2ND INTEGER 
SUBQ.L 
MOVE. W 
MOVE® 
JSR 


#8, D0 
{A3) 


3; #RI_FLOAT ON DO 


#2,A1 
GXB,0(AS,A1.L) 
#8, DO 

(AS) 


3; NOW DIVIDE ONE F.P. NUMBER BY THE OTHER TO LEAVE Y COORD ON RI STACK. 


MOVE® 
JSR 

USE NEXT LINE IF A NEGATIVE 
JSR 


NOW SET THE GRAPHICS CURSOR 
MOVE.L 


MOVEQ 
MOVE .W 
ADDA.L 
TRAP 

BRA.S 


3; INTEGER TABLE 
« DOWN 

- RIGHT 

. GXA 

. GXB 


DC.W 
DC. W 
DE.W 
DC.W 
DC.W 
DC.W 


#$10,D0 H 
(AS) 

Y COORDINATE IS REQUIRED 
NEGATE 


#RI_ DIV ON DO 


(A7) AO OR 4(A7),AO OR 8(A7),AO ETC. 
CONSOLE CHANNEL ID IN AO 
#SD.POINT ON DO 

INFINITE TIMEQUT 


MAKE Ail STACK ABSOLUTE 


#36, DO 
#$FFFF ,DS 
Ab, AL 

#3 
NEXTBIT 


ae we “6h we we 


SKIP OVER INTEGER TABLE, ETC 


PIXEL OFFSET DOWNWARDS 
PIXEL OFFSET TO THE RIGHT 
1ST INTEGER OF X 

2ND INTEGER OF X 

1ST INTEGER OF Y 

2ND INTEGER OF Y 


re 8) 
10 
10 
1 
20 
1 


SUBROUTINE TO NEGATE THE F.P. NUMBER TOS 


NEGATE MOVED 
JSR 


RTS 


#$14,DO ; 
(AS) 


RI_NEG IN DO 


HHKEKLHEERHKEE KKK KKKKKKEKKREHHKEHERHKERHER EK KKK KREKKEKTKHEREHHEKEREHHHEREERRKERREKE 





And there it is. By adding these com- 
mands to the programs put together in 
parts 2 and 4 of this series, you can draw 
shapes on the screen to your heart's con- 
tent. However, there are one or two final 
points that need to be mentioned. 

Those of you familiar with Qdos will realise 
that | have avoided using an alternative 
arithmetic package utility called RI EXECB. 
It works like RI_EXEC, except thatit allows 
a whole list of arithmetic operations to be 
executed in order. Since this is precisely 
what we have been doing using RI_LEXEC, 
Rl_EXECB should have made our chunks 
of code more concise and, presumably, 
faster. There are two reasons why | have 
not used it. Firstly, these chunks were 
actually put together from smaller chunks 
to use the RI.EXEC command, and | find 
this modular approach more systematic, 
and easier to understand, even if the result 
is not optimised for brevity and speed. 
Secondly, RIl.EXECB is undoubtedly a deal 
more difficult to code (at least, | find it so). 


Simple shapes 


The last point is this: these chunks of 
code have been designed to do fairly 
simple tasks of drawing shapes from data 
in fixed parameter tables, but there are 
situations where this will not do. We may, 
for example, wish to use SD.LINE to plot 
a graph, where the program calculates 
each pointin turn, and then uses SD.LINE 
to draw from the previous point to the 
next. Alternatively, we may wish to draw 
shapes taking information from the key- 
board, either keying in actual numbers as 
parameters, or even using the cursor keys 
to fix the points to be used (like the ‘rubber 
banding’ in CAD programs). Clearly, as 
things stand, we will have difficulty using 
these chunks of code in these ways. Still, 
we can't run before we walk, and later we 
shall look at possible ways of dealing with 
these problems. 

Next time, we shall look at making (and 


essed in reverse order to get the four FP ° 
parameters on the RI stack in the correct 
order. 


The trap requires $35 in DO for 
SD_FLOOD, and a long word in D1 to set 
the status. This is 1 to turn the flood on, and 


stopping) sounds on the QL, and reading 
keypresses. That is, we shall look at using 
the IPC 8049 microprocessor built into 


Finally, we make the trap call as before, 
this time with $36 in DO for SD_GCUR trap 
Call. 


Fill command 


FLOOD (Listing seven) turns the 
graphics fillcommand on and off. When on, 
non re-entrant shapes are filled with the ink 
colour. Once an enclosed shape has been 
filled, the command automatically switches 
off, and needs to be called again to fill the 
next shape. This is a very simple trap, 
much like the screen handling traps dealt 
with in part 3. The reason it has been left 
until now is because it only works with 
shapes drawn using graphics coordinates, 
So it fits in here. 
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0 to turn the flood off. 


Listing 7 


WORD IN Di. 
Di.L 0 
Di.L = 1 


GRAPHICS FILL 
GRAPHICS FILL 


ae we wae ee Me AP OR Oe 


FLOOD MOVE.L 
MOVE® 
MOVE.L 
MOVE .W 
TRAP 


your QL. Happy coding! 


HEE KEKE EEE EERE EERE EEE HERE EE RHEE EKKEKEKKEEE ERE REE ERLE RHERRRHEE 


“FLOOD * 


OFF 
ON 
(A7) ,AO 


#$35 , DO 
#$1,D1 


#SFFFF ,DS 


#3 


HEHEHE KH HEE EEE EEE E KEE EE EEE EEE HEE EERE EEE EERE KER EERE ERE 
THIS ROUTINE TURNS GRAPHICS ‘FILL’ GN OR OFF DEPENDING ON THE LONG 


THIS IS AUTOMATICALLY SWITCHED OFF AFTER EACH GRAPHICS FILL. 


5 OR 4(A7),AO OR 8{A7),AO ETC. 
3; CONSOLE CHANNEL ID IN A0 

3; #SD.FLOOD ON DO 

; GRAPHICS FILL ON 

3 INFINITE TIMEOUT 


3 
S SHEKHAR HERE E EKER EE CE KER EEE KEE EKER EEE EE EEE EE EEREEEEREREREREEE 
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MICRO ADS 
MICRO ADS 
MICRO ADS 
MICRO ADS 


For Sale, 2 QL's (JM), Sandy 
SuperQboard, twin 31/2" drives, 
Microvitec Colour Monitor, Tandata 
QConnect Modem, Juki 6100 
daisywheel printer, SC1500L dot matrix 
printer, extensive software including 
Solution, Professional Publisher, 
Lightning, The Editor, Text87, 
Flashback, Taskmaster, TechniQL, 
GraphiQL, Professional Astrologer, etc. 
Many manuals and textbooks. £500 ono. 
Telephone any time 0753 543713. 


Abs 
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QL ROMS AND SPARES 
ROMS, MGE (Spanish, MGF (French), MGG 
(German), JS (English), £20 each. JM (English), 
£10 


MDVS. Complete QL MDV Subunit £20, head 
and chassis £10, Microswitch £2, Motor £6. 
Rubber & Plastic Roller £2. MDV2 Stand-off 
spacer + srew £2. ULA £5. Tr 4,5,6,7 set £2. 
MDV pcb inc, ULA £11. Prices include UK 
postage. Send SAE for price list of all QL spares. 
Joe Atkinson, 36 Ranelagh Road, Ealing, 
London W5 5RJ (Mail Order Only). 


nMIGRO ADS 
MICRO ADS 
MICRO ADS 


MICRO ADS 


For Sale, QL Minerva 512K Ramplus 
Qdisc 3 interface Toolkit 2, Rom battery 
backed clock, Tandata Modem Set 
collection software and books, 
assembler, QLWorld 1984-1992, some 
spares, £200. Phone Chris 0992 442807. 





QL REAL TIME DIGITIZER 


Digitize moving pictures in real time. Transforms QL into a 
video printer or 3-D image digitizer via a video camera/recorder 
* Digitizes in .02 secs. 

* 256x256 resolution in 8 levels 

* Full, 1/4 or 4x '/, screen modes 


* Screen update - 5 or 2.7 frame/sec 

* 1:1 grey level 9-pin printer dump. 

* Interfaces to QL ROM PORT 

* Runs on unexpanded QL and multitasks. 

* P&P 3.00 UK, 9.00 overseas, state MDV or FLP 

CL SYSTEMS, 403 CHAPTER ROAD, DOLLIS HILL 
LONDON NW2 5NG TEL: 081 459 1351 








MICRO ADS 
MICRO ADS 
MICRO ADS 
MICRO ADS 


If you wish to advertise in 
QL WORLD 


contact Jason 
on 
071 490 7161 
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QTop The definitive User-Front-End V1.11 SFR 70.-- 

The QL's equivalent to WINDOWS on MS-DOS PC's. The system-manager offers the mainmenus DESK, 
DEVICES, FILES, JOBS, KEYBOARD, PROGRAMS, MY PROGS, TOOLS and OPTIONS with 
over 110 sub-menus. QTop is ideal for Gold-Card or Harddisc users as it supports real Sub-Directories. The 
powerful QJUMP extended Pointer Environment is included and all its facilities are supported. Comprehen- 
sive 41 page manual. 

ArcED The professional Text-Editor V2.6 SFR 39.-- 

The Text-Editor especially for programmers. Written in fast, reentrant machine code (only 20KB). 
Comprehensive 29 page manual. 

ExeQtor The Super-QL in a limited edition/ask for quotation. 

We use the QL PCB, GOLDCARD, QIMI & Mouse, JFC K90 & MF-2 Keyboard, up to 3 discdrives and a 
harddisc (option) to build the Super-QL in a Tower case. QTop and ArcED are included on the system disc. 
Ask for free product information. Software is available on 3.5" or 5.25" disc, All our products are compatible 
with all QL compatible computer. Free updates and user-support. Please specify English or German version. 
Prices including P&P. Send orders with cheques to drawn in SFR to: 


COWO Electronic 


Urs Konig, Miinsterstrasse 4, CH-6210 Sursee, Tel 045-211478 
or contact TK Computerware (UK) and QLympic Computer Systems (Germany) 
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CLASSIFIED 


Please send coupon to: Advertising Department Sinclair/QL World, Panini House, 116/120 Goswell Road, 
London EC1. Pleae place this Classified Advertisement in the next issue of Sinclair/QL World. 





| enclose a cheque/P.O. to the value of £17.65 (inc. 
VAT) for a lineage advertisement of no more than 30 


words. Please make cheques payable to MCPC Ltd 


r 
: 
1 
i 
1 
1 
A 
j 
3 
{ 
i 
4 
i 
j 
i 
A 
Y 
i 
| 
f 
\ 
4 
d 
4 
: 
i 
A 
4 
l 
{ 
\ 
{ 
! 
i 
4 
i 
A 
d 
L. 


Sinclair/QL World March 1992 


= 
2) 
mu 
©) 
> 
OS 
7) 
= 
2) 
J 
©) 
> 
Le) 
0) 
= 
2) 
me 
\@) 
ib 
Ls ) 
W 
= 
2) 
mv 
.@) 
b 
OS 
WY 
= 
2) 
a 
ne) 
b 
O 
WY) 


"SGV OYDIN ** "SAV ODI "°° SAV ODI °° 


‘SdV Odi 


2 








PAGE DESIGNER 2 PLUS 

WRITTEN BY DILWYN JONES 
QL desktop publishing made simple with this long awaited 
revision seks Page Designer 2 program, seca sold by 
Sector Software. 
Mix standard text, high resolution text, and graphics on 
documents up to 9 pages long (depending on available 
memory size). Use it to make posters, eaflets, booklets, 
newsletters, and so on. Pages can be saved, loaded, printed, 
copied, etc. and can be in up to 4 colours, if you have a colour 
printer (driver for Star Colour LC10 included). 


* Very easy to use via simple on screen menus 

* Import wordprocessor text into columns across pages. 
* Text direct from either Quill "_doc" or plain text Files 
* Cut and Paste for moving things around and making clipart 
* Clip Art pictures supplied on separate disks 

* Large range of fonts supplie 

* Improved high resolution text - larger fonts now possible 
* Now Gold Card compatible 

* New, improved manual 

* Many new and improved features 

* Retains popular features of previous versions 

* Can still use files from older versions 

* Conversion routines for fonts & pages from other programs 
* Flexible, reconfigurable printer driver 

* Configurable startup - page size, fonts, etc 

: Sraohics section - lines, patterns, circles, etc 

* Load screens from art programs like The Painter 


PAGE DESIGNER 2 PLUS requires a minimum of 512k RAM 
to operate. It is available on el disk (3.5" or 5.25") only. 
PAGE DESIGNER 2 PLUS is much enhanced compared with 
the original, but still costs only £40.00! 


UPGRADES - £20.00. If you have an older version of Page 
Designer 2 and would like to upgrade it to the "2 PLUS" 
version, please send us the original master disk or proof of 
purchase from Sector Software (it will be returned to you) with 
an upgrade fee of £20.00. We will send you the new version 
on new disks with a new manual. 


PAGE DESIGNER 2 PLUS IS SCHEDULED FOR RELEASE IN MID- 
JANUARY, BUT YOU MAY PREFER TO CONTACT US BEFORE 
ORDERING IN CASE OF DEVELOPMENT DELAYS. WE WILL TAKE 
YOUR DETAILS AND CONTACT YOU WHEN IT IS READY IN THIS 
CASE. PLEASE CONTACT US IF YOU WOULD LIKE AN INFORMA- 
TION SHEET CONTAINING FURTHER INFORMATION AND A 
SAMPLE PRINTOUT FROM THIS SUPER PROGRAM. 


£40.00 


BIBLE TEXT DISKS £20.00 


King James Bible text available on a set of disks in either 
Quill "_doc" file format, or in plain text (editor) format. 
Please specify which format you would prefer 
when ordering. 


Dilwyn Jones Computing 
41 Bro Emrys, Tal-y-Bont, 


Bangor, Gwynedd LL57 3YT 
Tel: Bangor (0248) 354023 


LIBERATION SOFTWARE PRODUCTS 


QLIBERATOR V3.35 £50.00 
This great QL SuperBASIC compiler is now available from DJC. 
QLiberator is compatible with the full range of SuperBASIC 
commands and functions, and Minerva compatible (even with 2 
screen mode). Produce faster, multitasking code from your 
BASIC programs. Version 3.35 can produce ROMable, re- 
entrant code, libraries of compiled procedures and functions, 
and can even produce toolkit routine to expand the BASIC 
interpreter! Support for error trapping in your programs and even 
the WHEN VARiable construct where implemented. Requires 
minimum of 256k memory. 


BUDGET QGLIBERATOR £25.00 
Budget price, not a budget specification! This is a full function, 
easy to use SuperBASIC compiler that converts slow QL BASIC 
programs into fast multitasking jobs without fuss. COMPACT 
DESIGN MAKES IT SUITABLE FOR USE ON AN UNEXPANDED 
QL. Full language compatibility and useable with commercial 
toolkits, Support for pipes, error trapping, etc. 


QLOAD 7 QREF £15.00 
QLOAD is a utility for soeeding up the loading and saving of 
SuperBASIC programs on the QL. Even long BASIC programs 
load in seconds rather than the minutes it could normally take! 
Even allows the use of machine code extensions in a program. 
QREF is a BASIC cross-reference utility, a boon for BASIC 
programmers. Prints sorted lists of variables, procedures, func- 
tions etc ina program. Wild card selection of names, and aFIND 
function for the BASIC editor (or Toolkit 2’s ED). We use QLOAD 
and QREF and would not be without them when programming in 
QL SuperBASIC. 


IMAGE PROCESSOR V2 

WRITTEN BY DILWYN JONES 
screen picture image processing program. Fea- 
tures computerised Image Enhancement, Edge 
Detection, Screen Mode Conversion, Recolouring, 
Decolouring, Pixel Editing, Brush for hand altera- 
tions or simple drawing, very useful for tidying up 
digitised pictures or other applications where you 
need to alter and tidy up screen pictures. All 
facilities in Version 2 now work in both mode 4 and 
mode 8. 


UPGRADE FROM OLDER VERSIONS £10.00 - 
send us your master disk or proof of purchase (it 
will be returned to you) with upgrade fee of £10.00 
and we will supply you with a new disk and manual. 


£15.00 


SEE OUR MAIN ADVERT ELSEWHERE IN THIS 
ISSUE FOR OUR RANGE OF QL PRODUCTS AND 
POSTAGE RATES OVERSEAS (DJC SOFTWARE 
IS SENT POST FREE TO UK ADDRESSES) AND 
PAYMENT METHODS, INCLUDING CREDIT 
CARDS ACCEPTED. 





PERFECTION 
PERFECTION PLUS 


Perfection Is the finest word processor available for any 
computer. We have received dozens of letters from 
happy users saying just this... and all of these letters 
were unsolicited. "Superb" was used most often. 





Perfection manages to achieve all the sophistication of 
the most complex PC word processors while still using a 
user Interface as friendly as Quill's. Perfection has a dual 
system of user control: menus while you are familiarising 
yourself with the program, and direct commands for the 
time when you feel ready for more adventurous things. 
The two systems can be used interchangeably and even 
simultaneously. Even more exciting — both systems are 
iterative. In case you don't understand what this means, 
let us give you an example: suppose you wished to move 
a block of text using the menus. You would choose Block 
Move (yes, it is right in the first menu) and the screen 
would then tell you to move your cursor to the start of 
the block. On most word processors you would have to 
navigate manually to this position: indeed, on many of 
them (Quill included) only a subset of the normal 
navigation commands would be available. On Perfection, 
not only can you use all the manual navigation 
commands (viz all 28 permutations of CTRL, ALT, SHIFT 
and the arrow keys!) but in addition you can use direct 
commands like GoTo Line or Page or any of eight 
markers. Even more amazingly, you can use Search 
(either as a direct command or from the menus) even 
though you are already ‘within' a menu option. 


Perfection has about 200 commands, but the layout of 
menus and the choice of keys for the direct commands 
makes it very easy to master. Though a 100+ page 
manual is provided (with all the important bits right at 
the front), you should only need to consult it for 
specialised operations like macros. 


Even If speed Is not particularly important to you, we 
assure you that Perfection's lightning performance will 
enable you to use the word processor in sensible ways 
that you would not have dreamed possible before. For 
example, scrolling 100 pages or so is accomplished so 
quickly using the normal navigation commands that you 
do not need to bother using a menu option to do the 
move. Spelichecking, assuming you have Perfection Plus, 
Is accomplished virtually Instantly: to spellcheck this 
whole ad (all the pages) would take under 1.5 seconds... 
Searching (you can switch case sensitivity, as well as 
equivalences between tabs, soft spaces and hard spaces) 
is at the rate of about 100 A4 pages per second. 


Moving from one word processor to another is usually 
very traumatic. With Perfection, this will not be the case. 
Not only can Perfection read in Quill _doc and _exp files 
| directly (you do not even need to tell it they are Quill 
files!) but it can make direct and immediate use of your 
existing Quill printer driver. File re-export is also possible. 


Perfection Is truly WYSIWYG: this means that bold 
appears bold on screen, italics appear as italics, 
underlined as underlined, and so on. Of course, your 
printer may have functions we do not know about 
(upside down?). To deal with these, Perfection provides a 
number of on-screen shaded strips: these can be 
attached to any printer function you wish, and will not 
upset justification as a translate would. Of course, 
translates are provided as welll 


A variety of statistics on the document being processed 
are available: some of them are on view all the time, the 
rest can be toggled to instantly. Not only is there.a word 
count, but also page, line, character and special 
character (like Superscript Off) counts. There are also a 
dozen status Indicators, letting you know whether you 
are In Insert or Overwrite mode, whether a block Is 
defined, whether interactive spellchecking is enabled 
etc. Current line (from top as well as within page) and 
column positions and character codes are also available. 


A terrific feature of Perfection is the dual screen mode. 
You can view one part of the document while editing 
another. The sizes of the two windows are themselves 
adjustable, both In real-time or via the configurator. We 
should devote more space to the configurator: however, 
it must suffice to say that everything that could be 
dynamically set within Perfection may also be preset 
with the configurator. The configurator can, for 
example, allow you to select any of 256 colours for any 
of a dozen parameters (like paper colour, border colour, 
status window ink and paper colour etc). 


Perfection is fully multitasking without need for any 
external accessory: however, if you already use QPAC or 
Taskmaster or similar and are happy, you may go on 
doing so. 


There Is absolutely no way that we can prepare you for 
the quality ‘feel’ of Perfection. We have a great deal of 
experience using PC word processors costing many 
hundreds of pounds: with absolutely no exception, 
Perfection is far easier to use and master. 


So if you thought Perfection was unattainable, you have 
a very pleasant surprise coming to youl 




















LIGHTNING SPECIAL EDITION 


LIGHTNING 


These programs accelerate QL operation by up to 10x (2x 


—4x Is typical) without having any adverse effect 
whatsoever on compatibility or anything else. Lightning 
SE is typically 40% faster than the standard version. This 
acceleration Is totally independent of, and in addition to, 
any speed-up obtained by hardware means. So if you 
have Gold Card, your need for Lightning SE is just the 
same as if you had only an unexpanded QL - Lightning 
SE will accelerate both by the same ratio. 


The Lightning programs achieve their acceleration by 
automatically paging out sections of the QL's operating 
system and replacing these with optimal, concise code 


written by us. 





Lightning installation is a completely automatic and one- 






off: no knowledge of computing or programming is 
required. Once installed, Lightning can be completely 
forgotten about - you will soon get used to the superb 


speed! Knob twiddlers are catered for too. 


Lightning technology is not built in to any of our other 


programs. Perfection users (as well as users of all other 
QL software) should therefore use Lightning all the time. 


In summary: if you do not have Lightning, you are 


The Professional in 
Professional Publisher 
refers to the quality of 
output from that program, 
and is not meant to sug- 
gest any complexity of op- 
eration. Few programs are 
as easy to use as this 


a St paar? 


users will 
be able qo Oo 
to do , 
with- 

out using 
a manual! 


Professional Publisher is by 
far the best DTP program 
for the QL. It Is fully com- 
patible with Perfection, 
Editor, Quill, Eye-Q & the 
ASCII editors. It allows you 
to both create and import 
both text and graphics. 
Text can be ‘poured’ into 
boxes of any shape , size 
and number, automatically 
maintaining justification 
and hyphenation settings. 
So flowing text around 
graphics is a doddle. 





wrong. Buy this one ARST OF ALL! 


PROFESSIONAL PUBLISHER 


Professional Publisher is 
supplied with a generous 
selection of fonts of vari- 
ous sizes, as well as clip 


Justification 

is by pixel, not by 

character. This gives a 
much smoother effect. 
It is pointless for us to try 
to list all of Professional 
Publisher's features —- we 
would end up filling half 
the magazine! We will 
concentrate on just a few 
‘points': Professional 
Publisher is extremely pre- 
cise, performing all its 
computations accurate to 
a small fraction of a mil- 
limetre. All its features can 
be preset by you using its 
configurator, ruling out 
the need for repetitive key 
strokes. 
The program is extraordi- 
narily versatile while re- 
maining intuitive In its 
user interface. Buy it! 


PROFESSIONAL PUBLISHER 
TOOLBOXES 


Toolbox | is an excellent collection of high definition 
fonts, clip art and utility programs for Professional 
Publisher. While the fonts supplied with Professional 
Publisher are excellent, many users will feel the need for 


a wider range of typefaces and styles. | 


Toolbox li starts where Toolbox | leaves off, providing an 
even better — and different - font collection. 


The two Toolboxes complement each other and are 
available together at a special price. 





FONT ENLARGER 


GRAFIX 


Font Enlarger does exactly what you would expect it to 
from its name. While Professional Publisher is also 
capable of enlarging fonts, it does them ‘on the fly' and 
consequently is not able to remove the jaggedness 
caused by magnification. Font Enlarger is much cleverer, 
and enhances detail without any step effect. 









While the built-in printer driver for Professional 
Publisher is excellent with 9-pin printers, it is not optimal 
with 24-pin or laser printers. Grafix is. 


AC) 
A DIGITAL PRECISION :10 
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EYE-Q 
ULTRAPRINT 


Eye-Q is the finest graphics program for the QL. While 
there may be other graphics programs with a few more 
features, no other program comes anywhere close to 
Eye-Q in sheer enjoyability. Eye-Q develops a pleasurable 
tactile relationship with you, and makes you feel like an 
artist (even if you aren't). Eye-Q graphics can be read in 
by Professional Publisher, and the latter's pages can be 
exported to Eye-Q (using Toolbox |). Everything in Eye-Q 
is menu-driven and there is context-sensitive help. 











While Eye-Q has its own printer driver, Ultraprint allows 
you 22 distinct styles/sizes of printer output. The 
reasoning Is that the scale of gradation suitable for 
pictures is probably unsuitable for text or line drawings. 


PC CONQUEROR 
Le] Royale]. 


PC Conqueror makes your QL into a PC-compatible 
machine,automatically. It does this by software means 
only, so there are no screws to undo or wires to fiddle 
with. Your QL stays a QL too. 


Why, might you ask, should you wish to make your QL 
into a PC-compatible? The reason is simple: you may wish 
to run the same programs at home as you do at work. 
Alternatively, you may wish to tap into the vast 
storehouse of PC software of every type and description 
you could imagine. 


Using PC Conqueror could not be easier. Just boot up your 
machine with the PC Conqueror disk In floppy 1 and 
within 10 seconds your QL will be transformed into a PC 
that Is just waiting to be switched on. From this point on 
you will do exactly the same as you would if you were 
running a ‘real’ PC — this means putting a DOS disk (any 


version) into one of your drives and pressing a key. If you 
do not already have legal access to a copy of DOS, we can 
provide you with one at reasonable cost (see our price 
list). 


PC Conqueror runs as fast as it is possible for a PC 
emulator to run: we have used all our skills to make it 
work quickly. Of course, you can make the emulation 
must faster by using Gold Card and Lightning SE. With 
this combination, you should get speed noticeably better 
than that of a PC XT... 


PC Conqueror allows you to fine-tune the operating 
environment of the PC in order to improve performance. 
If you get a hard disk or other high capacity floppy 
system, you can utilise part or all of it as a PC hard disk. 


PC Conqueror occupies under 80K and leaves 667K free 
for DOS when run on a Trump Card. This is more than you 
will get on a ‘real’ PC. 


Solution does what Conqueror does but Is about half as 
fast and is not quite as compatible. 





SPELLCHECKER 
MEGA DICTIONARY 


Spelichecker is what makes Perfection into Perfection 
Plus. We have made it available as a separate item for two 
reasons: (a) to allow Perfection owners to add it later 
(b) to allow users of other word processors to benefit 
from the very best in spelichecking technology. 


Spelichecker is supplied complete with three dictionaries 
of differing sizes as well as a system for building, 
reviewing and maintaining user dictionaries. 


Spelichecker's ultimate accessory is the Mega Dictionary, 
which gives the user a vocabulary of over 350,000 words! 


3D PRECISION CAD SYSTEM 





This program allows you to manipulate shapes and 
figures In 2D and 3D at a speed that will leave you 
breathless. Irrespective of whether your interest is in CAD, 
in animation or in just having fun, this program should 
not be missed. You can output to plotters directly from it, 
or alternatively create graphics screens to be manipulated 
and output by Eye-Q, Ultraprint or Professional Publisher. 


SUPER SPRITE GENERATOR 






SSG moves things about the screen very fast and very 
smoothly, without flicker. Sprites can have up to 16 frames. 

















